$ret = `$^X $ARGV[0]`;
or
system('$^X $ARGV[0]');