@perl = qw{
/usr/bin/perl
-I /internal/charrison
};
@program = qw{ /internal/charrison/test };
@args = qw{
-l /internal/charrison
-P /internal/charrison
};
@cmd = ( @perl, @program, @args );
use Data::Dump;
dd( \@cmd );
exec @cmd;