my $backtick = q~" print qq,$_, for @ARGV " 1 2 "3 4 5" 6 %cd% ~;
print "
# copy in between backticks and paste in shell
`$^X -le $backtick`

";
print `$^X -le $backtick `;
__END__

# copy in between backticks and paste in shell
`D:\Perl\bin\perl.exe -le " print qq,$_, for @ARGV " 1 2 "3 4 5" 6 %cd% `

1
2
3 4 5
6
D:\