关于用perl读某文件夹下的文件名

opendir(DIR, $dir_name) || die "Can't open directory $dir_name";
@dots = readdir(DIR);
为什么在显示@dots的时候，会有。 。出现?不知道哪来的? 本人刚开始学perl，还请大虾指教。

无论文件夹下改多少文件数量 开始的都有这两对点，其他都是对的，可为什么会有这东西呢。

。 是当前目录
.. 是父目录， 任何dir都有的，这个在linux , win下都是这样的
除非 grep { ！/^.{1,2}/ }  @dots   就行了，

   
哦 谢了