create a tree with mkpath

[donny750]

hello,

I want to create a tree like this

home
dev1 test
dev2 file1
file2

in fact, like this

mkdir home
mkdir home/dev1
mkdir home/dev1/test
mkdir home/dev2
mkdir home/dev2/file1
mkdir home/dev2/file2

Is it necessary to repeat the path like

'home/dev2/'

??


My code :

#!/usr/bin/perl
 
use File::Path;
 
mkpath(['home/dev1/test', 'home/dev2/file1','home/dev2/file2'], 1);

Thanks

 

[ishnid]

I'm not sure what your question is. Did your code not work?

 

[donny750]

my code work
but i want to know if it is like this i must to do to create directories or their are a best way ?

 

[ishnid]

When you create 'home/dev1/test' it will create 'home', 'home/dev1' and 'home/dev1/test' if they haven't been created already. There's no need to create 'home' and 'home/dev1' seperately. Does that answer your question?

 

[donny750]

i don't make this

mkdir home
mkdir home/dev1
mkdir home/dev1/test
mkdir home/dev2
mkdir home/dev2/file1
mkdir home/dev2/file2

when i run my script
i see this in the shell

mkdir home
mkdir home/dev1
mkdir home/dev1/test
mkdir home/dev2
mkdir home/dev2/file1
mkdir home/dev2/file2

 

[ishnid]

Yes, those are the commands that File:ath has to execute in order to create the paths that you've asked for. You don't need to specify the parent directories, but the module has to create them before it can create the subdirectories.

 

[donny750]

heu can you explain me
you say i can simplify this

#!/usr/bin/perl
 
use File::Path;
 
mkpath(['home/dev1/test', 'home/dev2/file1','home/dev2/file2'], 1);

 

[ishnid]

No, you won't simplify it any more than that.

 

[donny750]

thanks