C:\>perl -le "eval q!print $^O! for 1..10; eval q!die!;print $@"