foreach my $key (sort keys %data) {
   print 'insert into db_table(',
      join(',',('entity',keys %{$data{$key}})), ') values(',
      join(',',map { "'$_'" } ($key,values %{$data{$key}})), ")\n";
}