How to call a perl script from an apple script

Applescript to call a perl script named "/tmp/x.pl" passing an argument "world"

do shell script "/usr/bin/perl /tmp/x.pl world"

or if the script is given the executable atttribute (chmod +x /tmp/x.pl),

do shell script "/tmp/x.pl world"

Perl script "/tmp/x.pl" that prints a string using a passed argument

#!/usr/bin/perl

print "Hello $ARGV[$1]\n";

You can also embed the perl in the do shell script command:

http://putnamhill.net/applescript/inline-perl