sub insert_element { my $table = pop @_; my @values = @_; $db->do("insert into '$table' values ('@values')") or my $error = $db->errstr; if (defined($error)) { die syslog('info',"insert: $error"); } }