File::Basename is one way...

use warnings;
use strict;
use File::Basename qw(basename);

my @file_name_array = (
    "/proc/cpuinfo", "/proc/meminfo", "/etc/fstab",
    "/proc/net/pf_ring/info", "/var/log/boot.log",
    "/etc/sysconfig/network-scripts/ifcfg-eth0",
    "/etc/sysconfig/network-scripts/ifcfg-eth1",
    "/etc/sysconfig/network-scripts/ifcfg-eth2",
    "/etc/sysconfig/network-scripts/ifcfg-eth3",
    "/etc/sysconfig/network-scripts/ifcfg-eth4",
    "/etc/udev/rules.d/70-persistent-net.rules"
);

print basename($_), "\n" for @file_name_array;

__END__
cpuinfo
meminfo
fstab
info
boot.log
ifcfg-eth0
ifcfg-eth1
ifcfg-eth2
ifcfg-eth3
ifcfg-eth4
[download]