my $sql = qq{
-select *
+select distinct *
from $table
inner join rad_ustanova using (id)
left outer join rad_napomena using (id)
my $row = $sth->fetchrow_hashref;
+ while ( $self->{_deduplicate}->{ $row->{id} } ) {
+ warn "DUPLICATE $row->{id}, skipping\n";
+ $row = $sth->fetchrow_hashref;
+ return unless $row;
+ }
+ $self->{_deduplicate}->{ $row->{id} }++;
+
die "no row" unless $row;
my $id = $row->{id} || die "no id";