for my $param ($server, $database, $user, $password, ... 
               $sendmail, $initversion) 
{
     help() and last if ($param eq q{});
}