Help for this page

Select Code to Download

Select or download this

  if ($line !~ /^\(.*\)\s*$/) {
    print "here: $line\n";
    return undef;
  }