Ver Tema

iodo23 · 2008-04-23 21:01 @917

Ante todo, saludos a todos los compañeros Perl. Estoy diseñando un servidor mediante un pic, donde todo el código está en C; tengo un cgi que muestra un valor en la página; sin embargo, yo quiero ir mostrando varios datos sin que se borre el anterior. Es decir, voy a mostrar en la página una tabla de datos que se va a llenar o modificar cada 4 segundos.

¿Cömo lo puedo hacer? ¿Será que se puede hacer un ciclo donde se modifiquen los parámetros y coordenadas del valor a mostrar?

Aquí les dejo el cgi:

Syntax: [ Download ] [ Hide ]

<html>
<meta http-equiv="refresh" content="4">
<body>
<table>
<tr>
<td><b>temperatura</b></td>
</tr>
<tr>
<td>termocupla: %02 ºC</td>
</tr>
</table>
</body>
</html>

Con este pequeño cgi logro mostrar el valor de la termocupla, pero lo wur quiero es hacer una tabla de datos. el valor %02 es para la referencia de los parámetros en el servidor, es decir, mediante este %02 es que se puede enviar el valor de la termocupla. No soy experto en CGI ni Perl.

Espero que alguien me pueda ayudar...

explorer · 2008-04-24 02:27 @144

Bienvenido a los foros de Perl en Español, iodo23.

Se me ocurren varias soluciones.

Una de ellas es que se guarden en el servidor el listado de las temperaturas, y que el cgi se encargue de presentarlas en esa tabla, que será más grande con cuantas más muestras tenga.

Es decir, si ejecutamos el cgi, éste tomará una muestra, la guardará en un fichero o base de datos local, y luego mandará al usuario todo el HTML con todos los datos recogidos hasta el momento.

En Perl se puede hacer fácil con un módulo como Cache::Cache.

iodo23 · 2008-04-24 18:49 @826

¡OK, buena idea! Yo puedo guardar los valores en el servidor, claro hasta un cierto limite, porque el servidor no tiene mucha capacidad de memoria. La idea es mostrar 10 valores en la página. Lo que entiendo, es que guarde los 10 valores en el servidor, luego cada cierto tiempo, por ejemplo 10 minutos, muestro los diez valores en la página. Revisé el link que dejaste sobre Cache::Cache. Te agradecería si me das una mano con el ejemplo que esta allí, ¿qué significado tienen estos códigos? ¿esto lo puedo colocar en el cgi?

Syntax: [ Download ] [ Hide ]

Using perl Syntax Highlighting

use Cache::FileCache;

  my $cache = new Cache::FileCache( );

  my $customer = $cache->get( $name );

  if ( not defined $customer )

  {

    $customer = get_customer_from_db( $name );

    $cache->set( $name, $customer, "10 minutes" );

  }

  return $customer;

Publicidad

Socializa