Help for this page

Select Code to Download

Select or download this

my @lines = <FILE>;

...
  foreach my $str (@lines) {
    chomp(@lines);
  }