#!/home/ben/software/install/bin/perl use warnings; use strict; my $file = 'getopt'; if (! -f $file) { system ("make getopt"); } my @tests = ( '-a', '-b', '-b something', '-b something another thing', ); for my $test (@tests) { system ("./getopt $test"); }