Select Code to Download

$dbh->do ("CREATE TABLE ScoreCard
             (  id        integer PRIMARY KEY AUTOINCREMENT,
...
                Club      varchar(30)   DEFAULT ''
             );
          ");

$score //= 0; #set to zero if undef

#!/usr/bin/perl
use strict;
...

__END__
all rows=[[1, undef], [2, undef], [3, ""], [4, 333]]