Wouldn't it be much simpler to do something along the lines of;

do "test.pl";

tlhf