在Perl中是否有正则表达式找到文件的扩展名？

发布时间：2020-12-15 21:20:42 所属栏目：大数据来源：网络整理

导读：在Perl中是否有正则表达式找到文件的扩展名？例如，如果我有“test.exe”，我该如何获

在Perl中是否有正则表达式找到文件的扩展名？例如，如果我有“test.exe”，我该如何获取“.exe”？

解决方法

my $file = "test.exe";

# Match a dot,followed by any number of non-dots until the
# end of the line.
my ($ext) = $file =~ /(.[^.]+)$/;

print "$extn";

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!