Help for this page

Select Code to Download


  1. or download this
    chomp(my @myarray=`cat $myfile`);
  2. or download this
    open(my $fh, '<', $filename)
   or die("Unable to open ...: $!\n");

chomp(my @myarray = <$fh>);
  3. or download this
    open(my $fh, '<', $filename)
   or die("Unable to open ...: $!\n");
...
   chomp;
   ...
}