in reply to Re^2: Extract length sum from columns and print pattern into another file
in thread Extract length sum from columns and print pattern into another file

my $infile = 'file1.txt';
open IN,'<',$infile 
  or die "Could not open $infile : $!";

while (<IN>){


}
close IN;

[download]
See perlopentut

poj

  • Comment on Re^3: Extract length sum from columns and print pattern into another file
  • Download Code

In Section Seekers of Perl Wisdom