$a = "/root/subroot/subsubroot/filename";
$b = dirname $a;
$c = basename $a;

##</code><code>##

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