C:\temp> pwd; pwd

##</code><code>##

C:\temp> perl -e 'system("pwd; pwd");'

##</code><code>##

C:\temp> echo 1; echo 2; echo 3

##</code><code>##

$ perl -e 'my @cmds = ("echo 1", "echo 2", "echo 3", "pwd", "pwd"); system $_ for @cmds'
1
2
3
/Users/ken/tmp
/Users/ken/tmp