open (F, '<', "test2.pl");
eval <F>;
close (F);