in reply to system command

You could use IPC::Open3 or consider the possibility of transforming your 2.pl into a module

Careful with that hash Eugene.