perl – 用于查找所有类似命名文件的脚本(仅根据大小写不同?)

前端之家收集整理的这篇文章主要介绍了perl – 用于查找所有类似命名文件的脚本(仅根据大小写不同?)前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
我一直在使用命令行处理SVN仓库.我现在必须引入需要GUI与repo接口的用户,但这会给类似命名的文件带来许多问题.

由于缺乏沟通或懒惰,大量图像因为原因而被复制.

我希望能够从给定文件夹中递归搜索所有文件,并识别所有只有大小写/大小写不同的文件,并且必须具有相同的文件大小,因为不同文件之间肯定存在冲突,尽管我还没有遇到过.

我不介意用Perl脚本来处理这个问题,但是我想知道这件事是否已经存在,或者在我卷起袖子之前是否有任何提示

感谢:D

解决方法

我依靠md5sum来解决这类问题:

find * -type f | xargs md5sum | sort | uniq -Dw32

如果您使用的是svn,则需要排除.svn目录.这将打印出具有相同内容路径的所有文件.

如果您真的只想匹配大小写不同的文件,可以在上面的管道中添加更多内容

find * -type f  | xargs md5sum | sort | uniq -Dw32 | awk -F'[ /]' '{ print $NF }' | sort -f | uniq -Di
myimage_23.png
MyImage_23.png

猜你在找的Perl相关文章