Estoy haciendo un script para descargar unos archivos y guardarlos en mi PC. Este es el código:
Using perl Syntax Highlighting
- use strict;
- use LWP::Simple;
- my $saved_dir = '..\Archivos\\';
- my $url;
- my $file;
- $url = 'http://igdawg.org/pubs/cwd200_alleles.txt';
- $file = $saved_dir.'CWD.txt';
- getstore($url, $file);
- $url = 'https://frequency.nmdp.org/Download?fName=/DRB1~DQB1.xls';
- $file = $saved_dir.'frequency.xls';
- getstore($url, $file);
Coloreado en 0.004 segundos, usando GeSHi 1.0.8.4
El primer archivo lo descarga sin ningún problema, el segundo da este error:
Use of uninitialized value in subroutine entry at blib\lib\Net\SSLeay.pm (autosplit into blib\lib\auto\Net\SSLeay\randomize.al) line 962.
No tengo ni idea de qué está pasando. ¿Alguna sugerencia?
Gracias.
