use strict; use Test::Harness; my @scripts = qw( ../../somedir/anotherdir/script.pl ); runtests(@scripts);