Foro - Perl en Español

Bueno lo que quiero es restar dos fechas dadas por algun modelos y que me de su resultado en días, un ejemplo de esto aunque no se cómo se haga en Perl sería

Código: Seleccionar todo

num_dias = (mm-dd-aaaa) - (mm-dd-aaa)

num_dias = (05/15/2007) - (05/10/2007)

Pues no se si se me entienda muy bien la idea, pero es para calcular el valor de una reserva en días de un hotel, el usuario dice el día de entrada y el de salida..

Esas lineas me salen cuando trato de ejecutar un script con el Date::Manip
QUe podra ser.

CGI Error
The specified CGI application misbehaved by not returning a complete set of HTTP headers. The headers it did return are:


ERROR: Date::Manip unable to determine TimeZone.
at D:/Perl/lib/Date/Manip.pm line 3635
Date::Manip::Date_TimeZone called at D:/Perl/lib/Date/Manip.pm line 676
Date::Manip::Date_Init() called at D:/Perl/lib/Date/Manip.pm line 1446
Date::Manip::ParseDate('10/07/2006') called at E:\O'Telch\Sitios web\aristi\date.pl line 8

y cuando lo monto en el servidor web en internet me sale que:

Internal Server Error
The server encountered an internal error or misconfiguration and was unable to complete your request.

CUando entro al registro de error dice que el script no ha retornado un header valido, y yo lo hice con el CGI print header;

Pues windows es lo mejor que tengo a la mano,,, ya que no pude instalar ni mis juegos ni el visual studio en linux.

Pero yo lo subi a internet a un servidor que tiene instalado un tal cpanel y me aseguran que el Operating system es Linux pero igual tratare de ver con eso