Help for this page

Select Code to Download

Select or download this

{
   my $line = <DATA>;
...
       return !defined $line
   }
}