my $sql = sprintf "insert into mytable (%s) values (%s)",
             join(",", @columns),
             join(",", @values);