my $filespec = "/root/subroot/subsubroot/filename";
my $path     = dirname $filespec;
my $filename = basename $filespec;