15/06/2006, 10:40
|
| | | Fecha de Ingreso: mayo-2005
Mensajes: 15
Antigüedad: 19 años Puntos: 0 | |
| Php a Perl
Cordial saludo, tengo el siguiente script en php:
$sql=" select max(campo_id)+1 numero from tabla";
$rs = mysql_query($sql,$conn);
$row = mysql_fetch_array($rs);
$nummax = $row["numero"];
$sql2="insert into tabla2 (campo1, campo2) values (1, $nummax)";
$rs2= mysql_query($sql,$conn);
$row2 = mysql_fetch_array($rs2);
como podria hacerlo en PERL usando el modulo de DBI? |