Then consider looking at the debug facilities that File::Path offers for make_path. Especially the error facility.
Also, from your code, it is not clear to me which statements are supposed to execute together and which are to demonstrate your problem. Especially the following two lines:
my @thefiles = <$GSR_fh>;
...
make_path(map {chomp} <$GSR_fh>);
Once you've read a filehandle (like $GSR_fh) to its end, you need to seek to the start again before you can read the file again. But why re-read the file if you can use the data in @thefiles? |