[perl] How can I call a shell command in my Perl script?