http://qs321.pair.com?node_id=1186619


in reply to Directory Structure.

Hi Nansh
You can use File::Util for creating sub directories.
#!/usr/local/bin/perl
use strict;
use warnings;
use File::Util;

my($fileHandle) = File::Util->new();
$fileHandle->make_dir('/XXX/YYY/ZZZ/');

[download]

In Section Seekers of Perl Wisdom