my $cmd = $^X;
my @args = ( qw' -l -e ', 'print $_ for 1 .. 10_000;' );