% $islandid= '<undef>' unless defined $islandid;
% $archipelago= '<undef>' unless defined $archipelago;
%
- islandid=<% $islandid %> archipelago=<% $archipelago %>
+ islandid=<% $islandid |h %> archipelago=<% $archipelago |h %>
%
% }
<%init>
use CommodsWeb;
-db_setocean('Midnight');
-db_connect();
+my $dbh= dbw_connect('Midnight');
</%init>