Help for this page

Select Code to Download


  1. or download this
    (my $name = $str) =~ s{.*/}{};      # basename
  2. or download this
    (my $path = $str) =~ s{$name}{};