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/))