 Jue Jun 29, 2006 2:18 pm
|
 |
kidd
Creador de Perl en Español
|
Registrado: 15 Oct 2003
Mensajes: 1389
Ubicación: México
|
|
| Perl Básico: Sesión 1 |
 |
|
Hola todos:
Con la buena noticia de que ya se va a impartir el primer tutorial interactivo de Perl en Español.
Como lo había dicho, el primer tutorial será acerca de Perl Básico y estará dividido en tres sesiones de una hora y media más o menos cada una.
========
Perl Básico - Sesión 1
Expositor: Uriel Lizama
Fecha y Hora: Miércoles 5 de Julio del 2006 a las 17:00 horas (Cd. de México GMT: -06:00)
Lugar: irc.freenode.net Channel:#perlenespanol
========
Les pido a todos que sean lo más puntuales posible, de preferencia llegar unos 10 ó 15 minutos antes. Luego se publicará un pequeño reglamento que se deberá seguir dentro de los tutoriales interactivos.
Para mayores informes acerca de los tutoriales interactivos por favor ir a:
Tutorial Interactivo: Perl Básico por Uriel Lizama
Canal IRC
Update de los Tutoriales Interactivos |
|
|
|
|
Mie Jul 05, 2006 4:11 pm
|
|
Lor
Perlero Nuevo
|
Registrado: 28 Abr 2005
Mensajes: 99
Ubicación: Argentina, Santa FE
|
|
| No hay nadie en el canal |
|
|
Uriel, estoy intentando ingresar al canal y no hay nadie. Son las 19 hs Argentina, 17 en DF. Se lleva a cabo el tutorial??
Gracias. |
|
|
Mie Jul 05, 2006 4:41 pm
|
|
monoswim
Vive para Perl en Español
|
Registrado: 18 Nov 2003
Mensajes: 716
Ubicación: Buenos Aires
|
|
|
|
|
yo ahora entro !!!
son las 19:36 espero que estés todavía
Saludos |
|
|
Mie Jul 05, 2006 7:16 pm
|
|
explorer
Moderador
|
Registrado: 24 Jul 2005
Mensajes: 4092
Ubicación: Valladolid, España
|
|
|
|
|
Esto es la forma que he encontrado para sacar la hora internet y de esa forma saber a que hora empieza, sin pensar en usos horarios. Lo único que hay que hacer es editar el código, la parte de Configuración, para poner la hora local de comienzo y la zona horaria donde está el conferenciante, y la zona horaria del oyente, si no está en la lista. Se ejecuta el programa y listo.
| Código: |
#!/usr/bin/perl -l
use DateTime;
### Configuración ###
my $fecha = "05/07/2006 17:00"; # Hora local del tutorial
my $zona_tutor = "America/Mexico_City"; # Zona horaria del tutor
# Zonas horarias de los oyentes
my @zona_local = qw"
America/Argentina/Buenos_Aires
America/Aruba
America/Asuncion
America/Bahia
America/Bogota
America/Cancun
America/Caracas
America/Costa_Rica
America/Dominica
America/El_Salvador
America/Fortaleza
America/Guadeloupe
America/Guatemala
America/Guayaquil
America/Guyana
America/Havana
America/Hermosillo
America/La_Paz
America/Lima
America/Los_Angeles
America/Managua
America/Mexico_City
America/Montevideo
America/New_York
America/Panama
America/Paramaribo
America/Puerto_Rico
America/Recife
America/Regina
America/Santiago
America/Santo_Domingo
America/Sao_Paulo
America/Tegucigalpa
America/Tijuana
Europe/Madrid
";
### Fin ###
my ($dia, $mes, $anno, $hora, $minuto) = $fecha =~ /(\d+)/g;
# Hora local del tutorial
my $tutorial = DateTime
->new(
day => $dia,
month => $mes,
year => $anno,
hour => $hora,
minute => $minuto,
time_zone=> $zona_tutor,
);
print "Hora tutorial: $tutorial - $zona_tutor";
# Hora GMT
my $gmt = $tutorial
->clone
->set_time_zone('GMT');
print 'Hora GMT : ' . $gmt;
# Hora local del oyente
my $local = $gmt->clone;
foreach my $zona_local ( @zona_local ) {
$local->set_time_zone($zona_local);
print "Hora local : $local - $zona_local";
}
# Hora de internet
my $internet = $tutorial
->clone
->add( hours => 1 )
->epoch;
print 'Hora internet: @' . sprintf "%5.1f", ($internet % 86400) / 86.4 ;
__OUTPUT__
Hora tutorial: 2006-07-05T17:00:00 - America/Mexico_City
Hora GMT : 2006-07-05T22:00:00
Hora local : 2006-07-05T19:00:00 - America/Argentina/Buenos_Aires
Hora local : 2006-07-05T18:00:00 - America/Aruba
Hora local : 2006-07-05T18:00:00 - America/Asuncion
Hora local : 2006-07-05T19:00:00 - America/Bahia
Hora local : 2006-07-05T17:00:00 - America/Bogota
Hora local : 2006-07-05T17:00:00 - America/Cancun
Hora local : 2006-07-05T18:00:00 - America/Caracas
Hora local : 2006-07-05T16:00:00 - America/Costa_Rica
Hora local : 2006-07-05T18:00:00 - America/Dominica
Hora local : 2006-07-05T16:00:00 - America/El_Salvador
Hora local : 2006-07-05T19:00:00 - America/Fortaleza
Hora local : 2006-07-05T18:00:00 - America/Guadeloupe
Hora local : 2006-07-05T17:00:00 - America/Guatemala
Hora local : 2006-07-05T17:00:00 - America/Guayaquil
Hora local : 2006-07-05T18:00:00 - America/Guyana
Hora local : 2006-07-05T18:00:00 - America/Havana
Hora local : 2006-07-05T15:00:00 - America/Hermosillo
Hora local : 2006-07-05T18:00:00 - America/La_Paz
Hora local : 2006-07-05T17:00:00 - America/Lima
Hora local : 2006-07-05T15:00:00 - America/Los_Angeles
Hora local : 2006-07-05T17:00:00 - America/Managua
Hora local : 2006-07-05T17:00:00 - America/Mexico_City
Hora local : 2006-07-05T19:00:00 - America/Montevideo
Hora local : 2006-07-05T18:00:00 - America/New_York
Hora local : 2006-07-05T17:00:00 - America/Panama
Hora local : 2006-07-05T19:00:00 - America/Paramaribo
Hora local : 2006-07-05T18:00:00 - America/Puerto_Rico
Hora local : 2006-07-05T19:00:00 - America/Recife
Hora local : 2006-07-05T16:00:00 - America/Regina
Hora local : 2006-07-05T18:00:00 - America/Santiago
Hora local : 2006-07-05T18:00:00 - America/Santo_Domingo
Hora local : 2006-07-05T19:00:00 - America/Sao_Paulo
Hora local : 2006-07-05T17:00:00 - America/Tegucigalpa
Hora local : 2006-07-05T15:00:00 - America/Tijuana
Hora local : 2006-07-06T00:00:00 - Europe/Madrid
Hora internet: @958.3 |
La lista de zonas horarias disponibles se puede sacar con el siguiente una-línea:
| Código: |
| perl -le 'use DateTime::TimeZone; print join "\n",@DateTime::TimeZone::ALL;' |
Relojes que marquen la hora internet hay unos cuántos:
http://www.panaga.com/clocks/clocks.htm (sección alternativos). Por ejemplo:
http://www.artefakt.com/projects/ibeat/ |
|
|
Lun Sep 10, 2007 3:15 pm
|
|
Azrack
Perlero Nuevo
|
Registrado: 14 Abr 2007
Mensajes: 17
|
|
|
|
|
| Disculpen, quizás estoy reviendo el tema pero ¿no hubiera sido bueno publicar los logs de los tutoriales que se dieron para los que no pudieron estar presentes? |
|
Powered by phpBB © 2001, 2005 phpBB Group
|
