Help for this page
if($#bids){ for (my $i = $#bids; $i > 1; $i = 1) { ... } }
if (@bids > 1){ for (my $i = 0; $i <= $#bids; $i++) { ... } }
if (@bids > 1){ for my $bid (@bids){ my ($alias, $email, $bid, $time, $add1, $add2, $add3) = readbid($b +id); } }
$time = sort ({ int $a <=> int $b } $time);