In Perl SQL-insert/update Abfrage

[juha]

Hallo Zusammen

In meinem Perl-Programm möchte ich gerne eine Tabelle verändern, entweder soll ein insert stattfinden oder ein update.
Was ist an folgendem Insert-Code falsch?
Stimmt meine update-Abfrage?

grüsse
juha

if($sollstunden eq "0")
{
 print "insert findet statt";

$db_command = "insert into soll
 (
         soll_id,
  soll_monat,
  soll_jahr,
  soll_tage,
  soll_stunden
 )
 values
 (
  1,
  '$monatzaehler',
  '$jahr',
   NULL,
  '@solleingabe[$monatzaehler]'
  )";
 $add = $dbh->do($db_command);
}
else
{
 print "update findet statt!";

update soll
        set soll_stunden = '@solleingabe[$monatzaehler]'
        where soll_id = $sollid;
}