如何根据perl中的扩展名删除文件?

Die*_*rdk 0 perl delete-file

我有关于删除Perl中的文件的问题.我想删除扩展名文件夹中的所有文件.log.在Perl中有一种聪明的方法吗?

我没有太多编码perl的经验.

Ole*_*kov 5

快而脏:unlink glob('*.log');.

我建议手动循环使用opendir/ readdirover目录以获得更多控制权.