OUTPUT:

C:\Perlmonks>make_paths.pl
mkdir one
mkdir one/two
mkdir one/two/three
mkdir four
mkdir four/five
mkdir four/five/six