open NUL, '<', 'nul' or die $!;;
defined( $s = readline( NUL )) or die $!;;
[Died at (eval 9) line 1.