Perl使用File::Basename获取文件扩展名的代码
(编辑：jimmy 日期: 2025/2/27 浏览：2)
File::Basename 模块用来析取文件路径中的目录，文件名以及后缀。
本文为大家介绍的这个例子，实现了获取/home/topgkw中所有文件后缀，其中目录返回空值。
此模块的详细用法，可以通过perldoc File::Basename命令查看，建议大家经常使用perldoc参阅相关模块的详细介绍，比网上搜索来的资料强多了。
例子：
注意：
1）、如果使用了 print start_html，则会输出类似如下的内容：
<!DOCTYPE html
PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" lang="en-US" xml:lang="en-US">
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
</head>
<body>
2）、使用print end_html，则会输出类似如下的内容：
</body>
</html>
来自：脚本学堂
本文为大家介绍的这个例子，实现了获取/home/topgkw中所有文件后缀，其中目录返回空值。
此模块的详细用法，可以通过perldoc File::Basename命令查看，建议大家经常使用perldoc参阅相关模块的详细介绍，比网上搜索来的资料强多了。
例子：
注意：
1）、如果使用了 print start_html，则会输出类似如下的内容：
<!DOCTYPE html
PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" lang="en-US" xml:lang="en-US">
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
</head>
<body>
2）、使用print end_html，则会输出类似如下的内容：
</body>
</html>
来自：脚本学堂