juerd@ouranos:~$ perl -MO=Deparse -e'print qw(a b c)'
print 'a', 'b', 'c';
-e syntax OK