Hello EagerforPerl,

Your program does not compile:

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.
[download]

This is because the unless block creates scope around the contents of the block outside which the lexically declared variables are not accessible:

$ 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.
[download]

If I change the code for opening the directory to:

opendir my $directory, 'C:\\Program Files\\OSNE' or
    die("Unable to open directory 'C:\\Program Files\\OSNE'\n");
[download]

... then I get a warning:

Name "main::OUTPUT" used only once: possible typo at 1201637.pl line 3
+4.
1201637.pl syntax OK
[download]

This is because you open your filehandle as $output but try to use it as OUTPUT ...

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.