Re: Counting the Extensions of the Directory

[merlyn]

I'm not sure what an extension is, because it's apparently some file with a period followed by non-alphanums at the end of the name. That's pretty rare. Did you mean \w+ instead of \W+?

[Mago]

Ok ! Yes, you are certain, with \w+ is very better.



perl -e 'while(<*>){if(-f && /\.(\w+)$/){$e{$1}++}}print "$_ -> $e{$_}
+\n" for keys %e'

Thanks;