Bug of the day
In a project for a client:
# remove duplicate raw lines
my $dups = $self->dups;
return if $dups->{raw}++;
Should have been:
# remove duplicate raw lines
my $dups = $self->dups;
return if $dups->{$raw}++;
No wonder all lines except the first where dups...
