Please use <code> ... </code> around your code, data and console output so it renders and downloads properly (see the Writeup Formatting Tips).

Please post the complete program you're using and how you are calling it. If you get the error message Unable to open 1, that means that perl tried to open the file 1. So likely, you are setting $path to the wrong value - check where and how you set $path.