Select Code to Download

use DBI;
my $dbh = DBI->connect(...);
...
    (?, ?, ?, ?, ?)
};
my $sth = $dbh->prepare($sql_insert);

$sth->execute(@school{qw{location name type address description}});

$sth->finish();
$dbh->disconnect();