The solution to the problem is use File::Path;
When the mkdir is replaced with mkpath, everything functions as expected.

Thanks to everyone who helped!