my $krow = join "\0", @row;
$seen{$krow}++ and next;

##</code><code>##

my $row_as_string = join "\0", @row;
next if $seen{$row_as_string}++;