[ For future reference ]

What error is -e returning? (Check $!)

Make sure you are checking the path you mean to check.

use Data::Dumper;
local $Data::Dumper::Useqq = 1;
print(Dumper("$homedir/$dir/$sourcefile"));
[download]