Perl es uno de los lenguajes de programación más ricos en funciones. Perl es portátil y multiplataforma. Perl puede ejecutarse en más de 100 plataformas con capacidad de procesamiento de texto altamente integrada. Perl contiene las funciones de diferentes lenguajes como C, sed, awk y sh, etc., lo que hace que Perl sea más útil y productivo.
Perl es un lenguaje fácil de usar. Está destinado a ser eficiente y completo en lugar de elegante y minimalista. Perl es compatible con algunos de los principales paradigmas de programación, junto con los orientados a objetos, procedimentales y prácticos.
La fecha y la hora en Perl se pueden manejar mediante el uso de un módulo predefinido de Perl llamado módulo DateTime. DateTime es una clase para la representación de varias combinaciones de fechas y horas. El módulo DateTime en Perl representa el calendario New Style, extendido hacia atrás en el tiempo antes de su creación (en 1582).
Esto se conoce típicamente como el «calendario gregoriano proléptico».
En este calendario, el primer día del calendario (la época), es el primer día del año 1, que corresponde a la fecha que (incorrectamente) se creía que era el nacimiento de Jesucristo.
Sintaxis: use DateTime;
hora local()
localtime()La función en Perl devuelve la fecha y hora actual del sistema, si se llama sin pasar ningún argumento.
#!/usr/local/bin/perl $datetime = localtime(); print "Local Time of the System : $datetime\n";
Local Time of the System : Fri Nov 15 07:21:05 2019
Creación de una marca de tiempo
Se utiliza una marca de tiempo en Perl para mostrar la fecha y la hora actuales del día. Los datos mostrados por la marca de tiempo a veces tienen una precisión de una fracción de segundos.
La marca de tiempo se puede crear creando un objeto DateTime y luego llamando al constructor now .
#!/usr/bin/perl use DateTime; # Creation of Timestamp my $datetime = DateTime->now; print "$datetime\n";
También se puede crear un objeto DateTime proporcionando todos los detalles en forma parcial, como fecha, hora, minuto, segundo , etc. El valor predeterminado para las variables sin valor pasado es ‘ 0 ‘.
#!/usr/bin/perl use DateTime; # Assigning values to variable $datetime = DateTime->new( day => 18, month => 7, year => 2003, hour => 12, ); print"$datetime\n";
Encontrar la hora GMT
GMT significa Greenwich Mean Time, que es la hora solar media en el Observatorio Real de Greenwich, Londres. GMT es el mismo durante todo el año y no se ve afectado por los cambios de hora del horario de verano (Daylight Saving Time).
Perl proporciona una función predefinida para el cálculo y la representación de GMT, que es gmtime(). Esta función funciona de manera similar a localtime()la función pero la única diferencia es que los valores de hora están localizados solo para la zona horaria de Greenwich.
#!/usr/local/bin/perl # Using function gmtime() $datestring = gmtime(); # Printing GMT time print "Date and time in GMT: $datestring\n";
Date and time in GMT: Fri Nov 15 11:10:05 2019
Formateo de fecha y hora
localtime()La función también se puede utilizar para imprimir la fecha y la hora en varios formatos según los requisitos del usuario. Este formateo se puede hacer fácilmente usando printf()la función.
#!/usr/local/bin/perl
# Assigning values to variables
($sec, $min, $hour) = localtime();
printf("Time Format - HH:MM:SS\n");
# Formatting the time representation
printf("%02d:%02d:%02d",
$hour, $min, $sec);
Time Format - HH:MM:SS 11:38:06
Época Tiempo
El tiempo de época se refiere a la cantidad de segundos transcurridos después de una fecha y hora específicas. La fecha y la hora específicas utilizadas para calcular el tiempo de época varían de un sistema operativo a otro. Por ejemplo, para los sistemas POSIX o UNIX, esta fecha es el 1 de enero de 1970. Dado que esta hora varía de un sistema a otro, no se puede suponer una época de tiempo para ningún sistema.
#!/usr/local/bin/perl # Calculating epoch time $epoch = time(); print "$epoch\n";
1573818532