index 188ac1fc7634c1bb57616644e4628b10c95d569a..bd9f89d6ab371675c504d78efb21ba2633d73c56 100755 (executable)
# skip file names with binary extensions
# How are these updated? bjm 2012年01月02日
- return if ($_ =~ m/\.(ico|bin|po)$/);
+ return if ($_ =~ m/\.(ico|bin|po|key)$/);
my @lines;
tie @lines, "Tie::File", $File::Find::name;