Foro - Perl en Español

Hola chicos, a ver si me echáis un cable...

Tengo esta línea de código, que me devuelve el valor ascii de cada uno de los caracteres que contiene la variable $buf.

(es decir, esto me devuelve un valor del formato 110 213 12 31)

Mi problema lo tengo en que necesito guardar ese resultado (110 213 12 31) en una tabla de MySQL, y por más vueltas que le doy no consigo confeccionar la sentencia SQL; he probado de todo y nada...



He pensado también en asignar primero el valor a una variable y después poner la variable en la sentencia sql, algo como esto: (pero tampoco)


Os agradezco cualquier ayuda... Muchas gracias.

Hola,




El resultado será:



Esto ya lo podrás meter dentro de tu sentencia SQL.

Yo veo dos problemas...

El primero es fácil de ver: estás intentando guardar una lista de valores en una variable escalar, que solo puede guardar uno. Lo correcto es usar un arreglo.

Además, hemos cambiado el for() por un map(). El funcionamiento es el siguiente: el split() divide los caracteres de $buf y los va pasando uno a uno al map(), que ejecuta ord() en cada uno, devolviendo la lista de todos los valores, que son almacenados en el arreglo.

El segundo problema es la forma de guardar los valores en la base de datos.

No me queda claro cómo quieres guardar esos valores: ¿quieres guardar la lista de valores en un solo campo de la base de datos? ¿o quieres guardar cada valor en distintos registros de la base de datos?

Por la sentencia SQL que pones, parece que se trata de la primera opción.

Si, suponemos, que queremos guardar la lista de valores como una cadena de caracteres, en que los valores están separados por un espacio en blanco, podemos confeccionarlo antes:


Y ahora ya podemos construir la sentencia SQL:

¡Muchísimas gracias! ¡¡¡¡¡¡por fin!!!!!! Llevaba con esto desde las 9 de la mañana, de verdad muchísimas gracias