http://qs1969.pair.com?node_id=468828


in reply to everyauction script error bidding errors

simonwilliams, you wrote,
if($#bids){ for (my $i = $#bids; $i > 1; $i = 1) { ... } }
Where I'm pretty sure that what you meant was,
if (@bids > 1){ for (my $i = 0; $i <= $#bids; $i++) { ... } }
But, many of us would prefer to write this as:
if (@bids > 1){ for my $bid (@bids){ my ($alias, $email, $bid, $time, $add1, $add2, $add3) = readbid($b +id); } }
You also wrote,
$time = sort ({ int $a <=> int $b } $time);

This will not do anything. $time is not a LIST. See perldoc -f sort;

By the way, you'll get better answers if you work harder on distilling your question to one essential issue. Hope all this helps, and welcome to the Monastery.
mkmcconn