Perl 中是否有用于查找文件扩展名的正则表达式? [英] Is there a regular expression in Perl to find a file's extension?

问题描述

Perl 中是否有用于查找文件扩展名的正则表达式?例如，如果我有test.exe"，我将如何获得.exe"?

Is there a regular expression in Perl to find a file's extension? For example, if I have "test.exe", how would I get the ".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 "$ext\n";

这篇关于Perl 中是否有用于查找文件扩展名的正则表达式?的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！