use strict;
use warnings;
for my $arg (@ARGV) {
   print "arg=:$arg:\n";
}

##</code><code>##

$ perl print-args.pl 'Hello Bod'
arg=:Hello Bod:

##</code><code>##

C:\Bod> perl print-args.pl 'Hello Bod'
arg=:'Hello:
arg=:Bod':

##</code><code>##

PS C:\Bod> perl print-args.pl 'Hello Bod'
arg=:Hello Bod: