in reply to make directories from path
use File::Path; eval { mkpath($path) }; if ($@) { print "Couldn't create $path: $@"; } [download]