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>

来自：脚本学堂