diff -r 66b0448c2de4 -r 3c4e66eaef4a uh_parser/releaseables.pm --- a/uh_parser/releaseables.pm Thu Sep 02 17:58:49 2010 +0100 +++ b/uh_parser/releaseables.pm Fri Sep 03 11:18:29 2010 +0100 @@ -270,7 +270,8 @@ for my $file (@files) { - $file =~ /$::releaseablesdir[\\\/](.*)[\\\/]info\.tsv/; + print "counting distinct releasables in file $file\n"; + $file =~ /$::releaseablesdir[\\\/]*(.*)[\\\/]info\.tsv/; my $package = $1; $package =~ s,\\,/,g;