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