• Publicidad

Error cargando archivos html

¿Apenas comienzas con Perl? En este foro podrás encontrar y hacer preguntas básicas de Perl con respuestas aptas a tu nivel.

Error cargando archivos html

Notapor BigBear » 2013-12-21 12:19 @555

Tengo el siguiente código.

Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
  1. #!usr/bin/perl
  2. use Cwd;
  3.  
  4. sub cargar_archivo {
  5. if($^O =~/Win/) {
  6. system("start $_[0]");
  7. } else {
  8. system("firefox $_[0]");       
  9. }
  10. }
  11.  
  12. cargar_archivo(getcwd()."/logs_html/logs.html");
Coloreado en 0.003 segundos, usando GeSHi 1.0.8.4


El problema es que no me carga el archivo html. ¿Qué estoy haciendo mal?
BigBear
Perlero frecuente
Perlero frecuente
 
Mensajes: 981
Registrado: 2009-03-01 18:39 @818

Publicidad

Re: Error cargando archivos html

Notapor Aceitunas » 2013-12-21 14:58 @665

Funciona correctamente, fíjate si la extensión de tu archivo logs es html o htm.
Voy a llegar hasta el final, voy a subir la velocidad - Migue Benítez.
Aceitunas
Perlero nuevo
Perlero nuevo
 
Mensajes: 117
Registrado: 2013-11-07 15:25 @684
Ubicación: Ciudad Real, España.

Re: Error cargando archivos html

Notapor BigBear » 2013-12-21 15:04 @669

Funciona bien cuando el script está en el mismo directorio. El error aparece cuando usas este script en un directorio distinto.
BigBear
Perlero frecuente
Perlero frecuente
 
Mensajes: 981
Registrado: 2009-03-01 18:39 @818

Re: Error cargando archivos html

Notapor Aceitunas » 2013-12-21 16:37 @734

Obviamente, porque getcwd retorna la ruta del script.
Voy a llegar hasta el final, voy a subir la velocidad - Migue Benítez.
Aceitunas
Perlero nuevo
Perlero nuevo
 
Mensajes: 117
Registrado: 2013-11-07 15:25 @684
Ubicación: Ciudad Real, España.

Re: Error cargando archivos html

Notapor BigBear » 2013-12-21 18:26 @809

Ya sé qué retorna getcwd(), no me refería a eso.
BigBear
Perlero frecuente
Perlero frecuente
 
Mensajes: 981
Registrado: 2009-03-01 18:39 @818

Re: Error cargando archivos html

Notapor explorer » 2013-12-21 23:33 @023

getcwd() no devuelve la ruta del programa, sino el directorio de trabajo actual (en el momento de llamar a getcwd()).

Si no se ha cambiado con un chdir(), getcwd() será el del directorio desde donde se ejecutó el programa (que no tiene que ser necesariamente el mismo que en donde reside el programa).

Ejemplo:
Sintáxis: [ Descargar ] [ Ocultar ]
Using bash Syntax Highlighting
  1. explorer:~/Documentos/Desarrollo> cat kk.pl
  2. #!/usr/bin/perl
  3. use v5.16;
  4. use Cwd;
  5. say getcwd();
  6. chdir '/home/explorer';
  7. say getcwd();
  8. explorer:~/Documentos/Desarrollo> ./kk.pl  # llamamos al programa desde el mismo directorio
  9. /home/explorer/Documentos/Desarrollo
  10. /home/explorer
  11. explorer:~/Documentos/Desarrollo> cd ..
  12. explorer:~/Documentos> Desarrollo/kk.pl    # llamamos al programa desde otra posición
  13. /home/explorer/Documentos
  14. /home/explorer
  15. explorer:~/Documentos>
Coloreado en 0.003 segundos, usando GeSHi 1.0.8.4
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
Avatar de Usuario
explorer
Administrador
Administrador
 
Mensajes: 14480
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España


Volver a Básico

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 12 invitados

cron