Help for this page

Select Code to Download


  1. or download this
    while (<fh>) { ... }
while (defined ($_ = <fh>)) { ... }
  2. or download this
    while ($var = <fh>) { ... }
  3. or download this
    if ($line =~ m/$stag/ .. /$etag/)
  4. or download this
    if (($line =~ m/$stag/) .. ($line =~ m/$etag/))
  5. or download this
    if (($line =~ m/$stag/) .. ($_ =~ m/$etag/))