According to the code you posted line 25 appears to be

my @path = split /\\/, $path_str;
[download]

I'm at a loss at how this could be causing any problems considering you're checking $path_str on the previous line.

Makeshifts last the longest.