 Mar Mar 28, 2006 2:41 pm
|
 |
explorer
Moderador
|
Registrado: 24 Jul 2005
Mensajes: 4082
Ubicación: Valladolid, España
|
|
|
 |
|
¡¡¡Descubierto el fallo!!!
fiestas.txt:
| Código: |
*Holiday
21/3 = Día Natalicio de Benito Jaurez
16/9 = Día de la Independencia
20/11 = Día de la Revolución Mexicana
third Sunday in Jun = Día del Padre |
prueba.pl:
| Código: |
#!/usr/bin/perl -l
use Date::Manip;
Date_Init( "Language=English", "DateFormat=non-US","EraseHolidays=1","PersonalCnf=fiestas.txt");
$fecha = DateCalc("17/03/2006", "+9 business days");
$fecha = UnixDate($fecha,"%d/%m/%Y");
print $fecha; # 31/03/2006 |
Según he comprobado y como puedes ver, el fallo estaba en la forma de poner las fechas de las fiestas.
Otra cosa. Si pones el fichero de fiestas en el mismo directorio que el ejecutable, ya ves que no es necesario poner ningún camino al fichero.
Incluso funciona en español:
| Código: |
#!/usr/bin/perl -l
use Date::Manip;
Date_Init( "Language=Spanish", "DateFormat=non-US","EraseHolidays=1","PersonalCnf=fiestas.txt");
$fecha = DateCalc("17/03/2006", "+9 dias laborales");
$fecha = UnixDate($fecha,"%d/%m/%Y");
print $fecha; #31/03/2006 |
Lo he probado con la versión 5.42 en Suse.
Recuerda que para la versión 5.44 (la última) y si quieres usarlo en español, entonces hay que parchearlo como te comentaba antes. |
|
|
|
|
Mar Mar 28, 2006 4:09 pm
|
|
kidd
Creador de Perl en Español
|
Registrado: 15 Oct 2003
Mensajes: 1389
Ubicación: México
|
|
|
|
|
| explorer escribió: | ¡¡¡Descubierto el fallo!!!
Según he comprobado y como puedes ver, el fallo estaba en la forma de poner las fechas de las fiestas.
|
Y según yo lo había revisado, lo bueno es que encontraste el fallo. 
Saludos |
|
Powered by phpBB © 2001, 2005 phpBB Group
|
