Select Code to Download

my %seen;
while (my $ref = $pdbh->fetchrow_hashref()) {
...
    }
}
print join("\n",@results);

-- 
Joost       downtime n. The period during which a system
            is error-free and immune from user input.