# file: dummy.t use strict; use warnings; use Test::More tests => 1; use IPC::Run3; my @cmd = qw( perl dummy.pl ); ok( run3( \@cmd ), "Running @cmd" );