Select Code to Download

    if ($#bids) {
    for (my $i = $#bids; $i > 1; $i = 1) {
...
       }}
       }

    if ($#bids) {
    for (my $i = $#bids; $i > 1; $i = 1) {
...
$time = sort ({ int $a <=> int $b } $time); 
my ($alias, $email, $bid, $time, $add1, $add2, $add3) = &read_bid($bid
+s[$#bids]); 
if (($form{'ALIAS'} ne $lastbid[0]) && ($time < $lastbid[3])) {

#########################################################

...
       print "</TABLE><br>";
}