perl -e 'print BADHANDLE "Hello world.\n" or die $!' #### Bad file descriptor at -e line 1.