use File::Basename;
my $fname = basename($path);