As I said in this reply earlier, the problem is not in the part you showed us. Even with your original syntax, it worked fine for me.

The current issue you just showed is more to do with sql*plus and your environment, not Perl.