my $x = dopen( 'file-not-found' );
__END__
Can't open `file-not-found': No such file or directory
readline() on closed filehandle $fh