Help for this page

Select Code to Download


  1. or download this
    my @path_pieces = split('/', $path);
    my $last_path_piece = $path_pieces[$#path_pieces];
    
  2. or download this
    my ($last_path_piece) = $path =~ m|/(.*?)$|;
    
  3. or download this
    my ($last_path_piece) = $path =~ m|([^/]*)$|;
    
  4. or download this
    ------------
    :Wq
    Not an editor command: Wq