#!/usr/bin/ksh
echo "Doing what the Perl script tells me"
$(perl-script.pl)

##</code><code>##

#!/usr/bin/perl -w
print 'cd ~';