Perl使用File::Basename获取文件扩展名的代码

137 阅读 0 评论 91 点赞

我是靠谱客的博主阔达火，最近开发中收集的这篇文章主要介绍Perl使用File::Basename获取文件扩展名的代码，觉得挺不错的，现在分享给大家，希望可以做个参考。

概述

File::Basename 模块用来析取文件路径中的目录，文件名以及后缀。
本文为大家介绍的这个例子，实现了获取/home/topgkw中所有文件后缀，其中目录返回空值。
此模块的详细用法，可以通过perldoc File::Basename命令查看，建议大家经常使用perldoc参阅相关模块的详细介绍，比网上搜索来的资料强多了。

例子：
perl

注意：

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>

来自：脚本学堂