Help for this page

Select Code to Download


  1. or download this
    alias my $line = <DATA>;
while ( defined( alias my $line = <DATA> ) ) {}