##
E:\>perl -e"exec $^X,qw[ -e sleep(0);warn(666)];die 55" && echo BOO
666 at -e line 1.
BOO
E:\>perl -e"exec $^X,qw[ -e sleep(1);warn(666)];die 55" && echo BOO
BOO
E:\>666 at -e line 1.
####
crazyinsomniac@perlmonk:~$ perl -e'exec $^X,qw[ -e sleep(1);warn(666)];die 55' && echo BOO
666 at -e line 1.
BOO