Hello EagerforPerl,
Your program does not compile:
This is because the unless block creates scope around the contents of the block outside which the lexically declared variables are not accessible:Global symbol "$directory" requires explicit package name (did you for +get to declare "my $directory"?) at 1201637.pl line 25. Global symbol "$directory" requires explicit package name (did you for +get to declare "my $directory"?) at 1201637.pl line 26. 1201637.pl had compilation errors.
If I change the code for opening the directory to:$ perl -Mstrict -wlE 'unless (0) { my $foo = 42 }; say $foo' Global symbol "$foo" requires explicit package name (did you forget to + declare "my $foo"?) at -e line 1. Execution of -e aborted due to compilation errors.
... then I get a warning:opendir my $directory, 'C:\\Program Files\\OSNE' or die("Unable to open directory 'C:\\Program Files\\OSNE'\n");
This is because you open your filehandle as $output but try to use it as OUTPUT ...Name "main::OUTPUT" used only once: possible typo at 1201637.pl line 3 +4. 1201637.pl syntax OK
Also please consider that most websites don't appreciate repeated or frequent polling; I would recommend no more than a daily check if you simply want to see whether a site has new pages.
In reply to Re: Help with Web Scraping Script
by 1nickt
in thread Help with Web Scraping Script - Updated
by EagerforPerl
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |