use File::Basename; my $file = basename $path;