Programación Web y Scripting > Perl

 Re: obtener la hora del sistema

(1/2) > >>

yamilita:
me urge saber como obtengo la fecha del sistema en una variable para luego guardala en una bd para guardar la fecha de algun evento...
espero me ayuden por favor...
me urge

Avalon:
Utiliza la función localtime

($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);

Los valores obtenidos son, por este orden:

- segundos
- minutos
- horas
- dia del mes
- mes (retorna un valor del 0 al 11)
- año (retorna los años transcurridos desde 1900, de manera que en el año 2002 retorna 102)
- dia de la semana (retorna un valor del 0 al 6, siendo 0 el domingo y 6 el sábado)
- dia del año (retorna un valor entre 1 y 366)
- Daylight Saving Time (retorna 0 o 1, dependiendo del momento del año en que nos encontremos)

Espero que te sirva.

Salu2,
Avalon

yamilita:
si me sirve de muuuucho, lo unico es q a la hora q yo necesito meterlo a la bd, pues, es un solo campo el de fecha, entonces, estas variables q me dices estan separadas...
como las junto? las concateno o que?
es q no se:(

si me pudieran ayudar please...

saludos

Avalon:
Dependerá del formato del campo fecha que tengas en la BD. Si por ejemplo tiene el formato dd/mm/aaaa (dia/mes/año) pués tendrías que hacer algo como:

 
--- Código: Text --- ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time); $mon++;$year += 1900; if ($mday < 10) {    $mday = "0" . $mday;}if ($mon < 10) {    $mon = "0" . $mon;} $fecha = $mday . "/" . $mon . "/" . $year;  
Salu2,
Avalon

explorer:
Con el sprintf, que es como si pintaras, pero en vez de pantalla, a una variable:

--- Código: Text ---my (&#036;sec,&#036;min,&#036;hour,&#036;mday,&#036;mon,&#036;year,&#036;wday,&#036;yday,&#036;isdst) = localtime(time); &#036;mon++;&#036;year += 1900; my &#036;fecha = sprintf &#34;%04d/%02d/%02d %02d:%02d&#34;,    &#036;year, &#036;mon, &#036;mday, &#036;hour, &#036;min; Aunque siempre es mejor usar el módulo DateTime...

--- Código: Text ---&#62; perl -le 'use DateTime; print DateTime-&#62;now-&#62;ymd(&#34;/&#34;)'2006/07/09 

Navegación

[0] Índice de Mensajes

[#] Página Siguiente

Ir a la versión completa