Help for this page

Select Code to Download

Select or download this

while( defined( my $record = get_record( $fh ) )
    {
...

    join '', scalar <$fh>, scalar <$fh>;
    }

Select or download this

A red line is found at location 2.5 4.5