my %freqs;
$freqs{$_}++ foreach(@filenames);