my $output = qx{test.pl};