Hi
I have a CSV file with me in this format
Currency, USD, EUR,
USD, 1.00, 1.32,
EUR, 0.66, 1.00,
How do I transpose the file to get to the format below.
currency, currency, rate
USD, USD, 1.00
USD, EUR, 1.32
EUR, USD, 0.66
EUR, EUR, 1.00
Thanks for your help
We are using... (2 Replies)
Hello,
I have a file which has a range of date like:
00:00 test
00:01 test2
00:02 test3
00:03 test4
00:04 test5
00:05 test6
Using input (stdin) i would like to parse the data 00:01 to 00:04. The output file should be like this:
00:01 test2
00:02 test3
00:03 test4
00:04 test5
... (5 Replies)
Hi All,
I have an xml file with the below format.
<a>111</a><b>222</b><c>333<c><d><e>123</e><f>234</f><d><e>456</e><f>789</f>
output needed is
111,222,333,123,234
111,222,333,456,789
nawk 'BEGIN{FS="<|>"}
{print a,b,c,e,f
a=""
... (7 Replies)
Hi,
I have a file with 3 fields in csv format:
/tmp/foo/,MODIFY,bar/toto
"/tmp/foo, bar/","ATTRIB,ISDIR","toto, tata/foobar"I would like to split fields in order to obtain the following:
Line1:
/tmp/foo/
MODIFY
bar/totoLine2:
/tmp/foo, bar/
ATTRIB,ISDIR
toto, tata/foobarCan't find my way... (11 Replies)
Hey there...
I am looking for a way to take the below contents ( small excerpt) of this file called PTR.csv
ptrrecord,0000002e0cc0.homeoffice.anfcorp.com,,10.11.191.62,,,False,62.191.11.10.in-addr.arpa,,302400,default... (6 Replies)
Hi Forum.
Need your expertise on the following question.
I have the following file which I would like to parse, find first block of SELECT statment and concatenate all input fields as 1 field (~ delimited):
Old File:
SELECT /*+ USE_HASH(CCOMM ICAR IMAP IAS IP IMAS IMPS IAP SPCA) */
... (5 Replies)
Hi all, I would appreciate if someone could share how to convert CIDR notation to netmask and vice versa.
The value below is just an example. it could be different numbers/ip addresses.
Initial Output, let say file1.txt
Final Output, let say file2.txt (3 Replies)
My source file looks like this:
Cust-Number = "101"
Cust-Name="Joe"
Cust-Town="London"
Cust-hobby="tennis"
Cust-purchase="200"
Cust-Number = "102"
Cust-Name="Mary"
Cust-Town="Newyork"
Cust-hobby="reading"
Cust-purchase="125"
Now I want to parse this file (leaving out hobby) and... (10 Replies)
Scripting Language: bash shell script, python
I want to parse .nessus file in human readable format. If any one have any ideas please help me. (2 Replies)
Discussion started by: sk151993
2 Replies
LEARN ABOUT DEBIAN
net::subnets
Net::Subnets(3pm) User Contributed Perl Documentation Net::Subnets(3pm)NAME
Net::Subnets - Computing Subnets In Large Scale Networks
SYNOPSIS
use Net::Subnets;
my $sn = Net::Subnets->new;
$sn->subnets(@subnets);
if (my $subnetref = $sn->check($address)) {
...
}
my ($lowipref, highipref) = $sn->range($subnet);
my $listref = $sn->list(($lowipref, $highipref));
DESCRIPTION
Very fast matches large lists of IP addresses against many CIDR subnets and calculates IP address ranges.
This is a simple and efficient example for subnet matching:
use Net::Subnets;
my @subnets = qw(10.0.0.0/24 10.0.1.0/24);
my @addresses = qw/10.0.0.1 10.0.1.2 10.0.3.1/;
my $sn = Net::Subnets->new;
$sn->subnets(@subnets);
my $results;
foreach my $address (@addresses) {
if (my $subnetref = $sn->check($address)) {
$results .= "$address: $$subnetref
";
}
else {
$results .= "$address: not found
";
}
}
print($results);
This is a simple example for range calculation:
use Net::Subnets;
my @subnets = qw(10.0.0.0/24 10.0.1.0/24);
my $sn = Net::Subnets->new;
my $results;
foreach my $subnet (@subnets) {
my ($lowipref, $highipref) = $sn->range($subnet);
$results .= "$subnet: $$lowipref - $$highipref
";
}
print( $results );
This is a simple example for list generation:
use Net::Subnets;
my $lowip = '192.168.0.1';
my $highip = '192.168.0.100';
my $sn = Net::Subnets->new;
my $listref = $sn->list(($lowip, $highip));
foreach my $address (@$listref) {
# do something cool
}
METHODS
"new"
my $subnets = Net::Subnets->new;
Creates an "Net::Subnets" object.
"subnets"
$subnets->subnets([qw(10.0.0.0/24 10.0.1.0/24)]);
The C<subnets> method lets you prepare a list of CIDR subnets.
"check"
my $match = $subnets->check($address);
The C<check> method lets you check an IP address against the previously
prepared subnets.
"range"
my ($lowest, $highest) = $subnets->range($subnet)
The C<range> method lets you calculate the IP address range of a subnet.
"list"
my $list = $subnets->list($lowest, $highest);
The C<list> method lets you calculate a list containing all IP addresses
in a given range.
AUTHOR
Sebastian Riedel (sri@cpan.org), Juergen Peters (juergen.peters@taulmarill.de)
COPYRIGHT AND LICENSE
Copyright (C) 2003-2009, Sebastian Riedel.
This program is free software, you can redistribute it and/or modify it under the terms of the Artistic License version 2.0.
perl v5.10.1 2009-12-18 Net::Subnets(3pm)