Help for this page

Select Code to Download

Select or download this

$! = 0;
$line = readline $file;
!defined($line) && $! and die "error readline: $!";

Select or download this

$! = 0
$line = readline $file;
$! and die "error readline: $!";