<%perl>
my $sth_i= $dbh->prepare(<<END);
SELECT archipelago, islandid, islandname, timestamp
- FROM uploads NATURAL JOIN islands
+ FROM uploads JOIN islands USING (islandid)
WHERE islandid = ?
END
my $sth_a= $dbh->prepare(<<END);
SELECT archipelago, islandid, islandname, timestamp
- FROM uploads NATURAL JOIN islands
+ FROM uploads JOIN islands USING (islandid)
WHERE archipelago = ?
ORDER BY islandname
END