DateTime :: Preciso DateTime :: Precise puede realizar operaciones de tiempo y fecha comunes con operaciones de GPS adicionales.
Descargar ahora

DateTime :: Preciso Clasificación y resumen

DateTime :: Preciso Etiquetas

GPS hora fecha Operaciones de tiempo operaciones de fecha Operaciones GPS

DateTime :: Preciso Descripción

DateTime :: Precise puede realizar operaciones de tiempo y fecha común con operaciones de GPS adicionales. DateTime :: Precise puede realizar operaciones de tiempo y fecha comunes con operaciones de GPS adicionales.Synopsis Use DateTime :: Precise; Utilice DateTime :: QW preciso (: timevars); # Constructores y formas de establecer el tiempo. $ t1 = DateTime :: Precise-> Nuevo; $ t2 = DateTime :: Precise-> Nuevo ('1998. 4. 312: 13: 44.054'); $ T3 = DateTime :: Precise-> Nuevo (Tiempo () - 100.23456); $ t4 = DateTime :: Precise-> Nuevo ('1998.04.24'); $ t1-> set_localtime_from_epoch_time; $ t1-> set_gmtime_from_epoch_time (Time + 120.987); $ t1-> set_from_datetime ('1998.03.2316: 58: 14.65'); $ t1-> set_time ('ydhms', 1998, 177, 9, 15, 26.5); # Esto es lo mismo que $ D3-> Set_from_DataTime (...) $ T3-> DSCANF ("% ^ y.% M.% D% H:% M:% S", "1998.03.2520:25: 23 "); if ($ msg = $ d1-> dscanf ("% ~ m", $ entrada)) {impresión "Error: $ MSGN"; Imprimir "Debe ingresar un mes de tres letras abbrev.n"; } # Obtener diferentes partes de la época. $ año = $ t3-> año; $ mes = $ t3-> mes; $ día = $ t3-> día; $ horas = $ t3-> horas; $ minutos = $ t3-> minutos; $ segundos = $ t3-> segundos; ($ año, $ Day_of_year) = $ t3-> get_time ('yj'); # Tiempos de impresión y fechas. Imprimir $ t2-> asctime; Imprimir $ T2-> FRMTTIME ('% T% C% N'); Imprimir $ T2-> DPRINTF ("% ^ y.% M.% D% H:% M:% S"); # DateTime Print $ t2-> dprintf ("% ~ w% ~ m% -d% h:% m:% s CST% ^ Y"); # ctime # copie los tiempos de copia. mi copia de $ t4 = $ t2->; # Establezca un objeto de una vez al mismo tiempo que otro: configure $ T3 igual a $ T2. $ t3-> clon ($ t2); # Encuentra la diferencia entre dos veces. $ secs_from_midnight = $ t4 - $ t1; $ secs_from_midnight = $ t4-> diff ($ t1); # Añadir segundos, días, meses, etc. a tiempo. $ t1 = $ t4 + 3600; # $ T1 está ahora una hora después de la medianoche $ t1-> inc_month (2); # Añadir dos meses a $ t1 $ t1-> piso_month; # establecer $ T1 al primero del mes $ T1 - = 0.25; # Subtar 1/4 de un segundo de $ T1 # puede comparar y ordenar DateTime :: Precise. Imprimir "¡Es tarde !!!" si ($ t1> $ t4); @sorted = Sort @birthdays; # Las comparaciones normales funcionan bien # Obtenga las semanas de GPS, los segundos y el día. $ gps_week = $ t1-> gps_week; $ gps_seconds = $ t1-> gps_segonds; $ gps_day = $ t1-> gps_day; ($ gps_week, $ gps_seconds, $ gps_day) = $ t1-> gps_week_seconds_day; Requisitos: · Perl

DateTime :: Preciso Software relacionado