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

1205 查看

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>

来自:脚本学堂