use Perl;

my $p = Perl->new( ARGV => [ "-le", "print 'hello world'"] );
$p->run;