Welcome to the Monastery, EagerforPerl!
You've provided code, that's awesome (so is formatting it well!).
You're also using (at a quick glance) the majority of proper techniques (strict, warnings, 3-arg open etc ++).
What I'd ask you to do so the Monks may be better able to help is tell us what the code currently does, and how it deviates from what you're expecting. It would also be beneficial if you could provide the data that you're sending in as standard input so the Monks can test for themselves. If the URLs/input are off-limits somehow, that's understandable too... you'll just have to provide more detail on the expected/problematic situations.
ps. You do not need sub main {... in Perl. If your file does not contain only a package (class), the code will run just fine without a main() function. You can just put your code left-justified (unlike eg: C).
pps. I would recommend, despite what I said above, one change to the 3-arg open you use. Bareword file handles (ie., things like OUTPUT are global in scope. It is best-common-practice to use lexical (ie. scoped) handles instead. To do this, simply assign a scalar variable to hold the handle as opposed to the bareword: open my $fh, '...', '...' or die ...
In reply to Re: Help with Web Scraping Script
by stevieb
in thread Help with Web Scraping Script - Updated
by EagerforPerl
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |