for (@major_PER_Data) {
   print 'insert into db_table(',
      join(',',keys %$_), ') values(',
      join(',',map { "'$_'" } values %$_), ")\n";
}