#/bin/perl/

use strict;
use warnings;

use File::Path qw(make_path);

make_path("/one/two");