D:\>perl -e"die grep /6/, 3 .. 6,6,6"
666 at -e line 1.

##</code><code>##

perl -e "die scalar grep /6/, 3 .. 6,6,6"
3 at -e line 1.

##</code><code>##

perl -e 'die qw/1 2 3/'
123 at -e line 1.