my $sth = $dbh->prepare("INSERT INTO tblserverattributes(hostname,attrname,attrvalue) VALUES (?,?,?)"); foreach $attr( keys %{$info{'DATA'}}) { $sth->execute($hostname,$attr,$info{'DATA'}->{$attr}); }