前端之家收集整理的这篇文章主要介绍了
正则表达式 – 从Perl中的字符串中删除文件扩展名和路径，
前端之家小编觉得挺不错的，现在分享给大家，也给大家做个参考。
我想
获取一个没有其路径的
文件名(如果它是字符串的一部分)和扩展名。
例如：
/path/to/file/fileName.txt # results in "fileName"
fileName.txt # results in "fileName"
/path/to/file/file.with.periods.txt # results in "file.with.periods"
所以基本上，我想删除之前的任何东西，包括最后的“/”，如果存在，还有最后一个“”。以及之后的任何元字符。
对于这样的新手问题抱歉，但我是新来的perl。
为了方便地
获取一个
文件的基本
名称给一个完整的路径，我建议
@L_
502_0@模块，这是核心的一部分。
要做文件扩展名的启发式，我会去一个正则表达式
(my $without_extension = $basename) =~ s/\.[^.]+$//;
