perl中如何读取指定后缀的文件的文件名

Question

比如说读取当前文件夹下的.c文件的名称，然后去掉后缀并写入一个文件中

Answer 1

http://blog.csdn.net/csujiangyu/article/details/44002647

 grep { /^[^\.]/ } 换成你需要的正则，比如 grep { /^[^\.]\.txt/ }
匹配txt文件的