Perl - Como ejecutar un scrip perl desde otro(Menu ppal)U

Resulta que tengo unos programas en perl desarrollados en forma independiente por ejemplo prog1.pl , prog2.pl
prog3.pl.... y necesito ejecutarlos desde un menu principal ,intente con la funcion do(); pero me ejecuta una sola vez un
programa, no se si no es la mas eficiente o no la se usar. Conocen la forma correcta de usarla o una funcion mejor.
Gracias .

################## Principal
#!/usr/bin/perl

$Path = $ENV{'SCRIPT_FILENAME'} || $ENV{'PATH_TRANSLATED'} || $0;

require $Path.'programa1.pl';
require $Path.'programa2.pl';

&Main1;
&Main2("hola");

################## Program1
#!/usr/bin/perl

sub Main1{
print "Soy el Uno\n";
}
################## Program2
#!/usr/bin/perl

sub Main2($param){
print "Soy el Dos : $param\n";
}