Help for this page

Select Code to Download

Select or download this

    open(FH, "<", "a.txt") or die $!;
    my $line1 = <FH>;
...
    close FH;
__END__
eof!