Help for this page
perl -ne 'BEGIN {$col=1}' -e 's/\r?\n//; @F=split /\t/, $_; $sum += $F +[$col]; END {warn "Sum of column $col for $. lines\n"; print "$sum\n"}' file.t +ab
perl -e 'BEGIN {$col=1}' -lane '$sum += $F[$col]; END {print "Sum of column $col for $. line: $sum"}' file.tab
perl -lane '$sum += $F[1]; END {print $sum}' file.tab
Eureka! Give me a lever long enough ... Eppur si muove Mr. Watson – Come here – I want you Mary had a little lamb That's one small step for a man ... SCE to AUX I think I'll stop here
Results (153 votes). Check out past polls.