Help for this page

Select Code to Download


  1. or download this
    $ perl -MFile::Spec -wle 'my $path = shift; my $last = (File::Spec->sp
+litpath($path))[-1]; print $last' /etc/httpd/conf
conf
$ perl -MFile::Spec -wle 'my $path = shift; my $last = (File::Spec->sp
+litpath($path))[-1]; print $last' /etc/httpd/conf/httpd.conf
httpd.conf
  2. or download this
    $ perl -MPath::Class -wle 'my $path = shift; my $obj = file($path); pr
+int +(File::Spec->splitpath($obj))[-1]' /etc/httpd/conf/httpd.conf
httpd.conf
$ perl -MPath::Class -wle 'my $path = shift; my $obj = dir($path); pri
+nt +(File::Spec->splitpath($obj))[-1]' /etc/httpd/conf
conf