correcting the reuse-weights.perl for a new format

This should work.