correcting the reuse-weights.perl for a new format