system('perl -e "print qq[ARGV: @ARGV\n]" a b c');