替换函数来解析路径字符串

Question

我有一个字符串：

$path=/home/usr/project/name 

我正在尝试使用替换函数来解析字符串并获取名称。我期望的结果是：

$path=name

我尝试使用但没有成功：

$path =~ s/^.+\///;

我不确定语法是否正确。任何帮助，将不胜感激。谢谢！

Answer 1

File::Basename是一种比使用s///更便携的解决方案：

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

my $path = '/home/usr/project/name';
$path = basename($path);
print $path, "\n";

__END__

name