What you probably want is File::Basename.  It's in the core already (ie. no need to install it).

Try:

use strict;
use warnings;
use File::Basename;

my $base = basename("/home/BORK/work/test-backfills/cp_test/82802");

# Note that $base is now '82802'
[download]