C:\>perl -le "eval q!die!;print $@"