On my Unix system, scripts are not executable from the current directory without preappending "./" to the filename.

Your scripts works fine when I replace your open statement with:

open (P, "| ./from.pl");
[download]