in reply to What's wrong with my syntax?
This line is missing a semicolon:
my $FWfirewallqry = $FWdb->prepare(q(SELECT FirewallID FROM firewalls +WHERE FW-name = ?)) [download]