Hi, i have a file which content the following:
>cat cols
data a:23:data
data b:76:data
data c:-30:data
i would like to sum up the value of column 2, but the result that return to me is 0. Can anyone help?
i'm using this code to do the sum
awk -F" " 'BEGIN {x=0} {x+=$2} END {print... (5 Replies)
Here is my file name countries
USSR 8650 262 Asia
Canada 3852 24 North America
China 3692 866 Asia
USA 3615 219 North America
Brazil 3286 116 South America
India 1269 637 Asia
Argentina 1072 ... (8 Replies)
Hello,
I just need to print the # of columns for each line of the input file.
The input file uses the ascii 009 tab character.
I specify this character as the FS (field separator) in the BEGIN section, and I know the FS character is correct because I can print it.
When I try to print the #... (1 Reply)
Input file
data US 100.25
data ENG 235.01
data US 23.12
data ENG 23.01
END UK 230.50
END Russia 20.00
.
.
Desired output
data US 123.37
data ENG 258.02
END UK 230.50
END Russia 20.00
.
. (1 Reply)
Input file
11916 30640 9320 51876
5690 15874 4723 26287
5121 12269 2569 19959
9 71 6 86
Desired output file
11916 30640 9320 51876
5690 15874 4723 26287
5121 12269 2569 19959
9 71 6 86
22736 58854 16618 98208
Last part is the total up of first three data.
I used the following... (6 Replies)
Hi I have this file which contains
Al,AADESH,id1_0,23,2013-01-28,2,2
Al,AADESH,id1_0,23,2013-01-29,4,4
Al,AADESH,id1_0,23,2013-01-30,2,1
Al,AADESH,id1_0,31,2013-01-29,1,1
Al,AESH,id1_0,31,2013-01-31,2,2
Al,AESH,id2_2,23,2013-01-29,1,1
Al,AESH,id2_2,31,2013-01-31,1,1 ... (5 Replies)
Hi
i need to calculate the total of a column from a file in ksh
vi file.txt
System : CBSE ent=0.1 me=Cap
Subject Maths Science
xxxxx 56 98
yyyy 89 67
ooo 67 32
Here i need to calculate only the total of Maths column alone i.e., 56+89+67
... (4 Replies)
How to find total number of special character in a column?
I am using awk -f "," '$col_number "*$" {print $col_number}' file.csv|wc -l but its not giving correct output. It's giving output as 1 even though i give no special character?
Please use code tags next time for your code and... (4 Replies)
Devel::Refcount(3pm) User Contributed Perl Documentation Devel::Refcount(3pm)NAME
"Devel::Refcount" - obtain the REFCNT value of a referent
SYNOPSIS
use Devel::Refcount qw( refcount );
my $anon = [];
print "Anon ARRAY $anon has " . refcount($anon) . " reference
";
my $otherref = $anon;
print "Anon ARRAY $anon now has " . refcount($anon) . " references
";
DESCRIPTION
This module provides a single function which obtains the reference count of the object being pointed to by the passed reference value.
FUNCTIONS
$count = refcount($ref)
Returns the reference count of the object being pointed to by $ref.
COMPARISON WITH SvREFCNT
This function differs from "Devel::Peek::SvREFCNT" in that SvREFCNT() gives the reference count of the SV object itself that it is passed,
whereas refcount() gives the count of the object being pointed to. This allows it to give the count of any referent (i.e. ARRAY, HASH,
CODE, GLOB and Regexp types) as well.
Consider the following example program:
use Devel::Peek qw( SvREFCNT );
use Devel::Refcount qw( refcount );
sub printcount
{
my $name = shift;
printf "%30s has SvREFCNT=%d, refcount=%d
",
$name, SvREFCNT($_[0]), refcount($_[0]);
}
my $var = [];
printcount 'Initially, $var', $var;
my $othervar = $var;
printcount 'Before CODE ref, $var', $var;
printcount '$othervar', $othervar;
my $code = sub { undef $var };
printcount 'After CODE ref, $var', $var;
printcount '$othervar', $othervar;
This produces the output
Initially, $var has SvREFCNT=1, refcount=1
Before CODE ref, $var has SvREFCNT=1, refcount=2
$othervar has SvREFCNT=1, refcount=2
After CODE ref, $var has SvREFCNT=2, refcount=2
$othervar has SvREFCNT=1, refcount=2
Here, we see that SvREFCNT() counts the number of references to the SV object passed in as the scalar value - the $var or $othervar
respectively, whereas refcount() counts the number of reference values that point to the referent object - the anonymous ARRAY in this
case.
Before the CODE reference is constructed, both $var and $othervar have SvREFCNT() of 1, as they exist only in the current lexical pad. The
anonymous ARRAY has a refcount() of 2, because both $var and $othervar store a reference to it.
After the CODE reference is constructed, the $var variable now has an SvREFCNT() of 2, because it also appears in the lexical pad for the
new anonymous CODE block.
PURE-PERL FALLBACK
An XS implementation of this function is provided, and is used by default. If the XS library cannot be loaded, a fallback implementation in
pure perl using the "B" module is used instead. This will behave identically, but is much slower.
Rate pp xs
pp 225985/s -- -66%
xs 669570/s 196% --
SEE ALSO
o Test::Refcount - assert reference counts on objects
AUTHOR
Paul Evans <leonerd@leonerd.org.uk>
perl v5.14.2 2011-11-15 Devel::Refcount(3pm)