in reply to Perl script not running through
Hi,
when I include a particular bit of code. For the life of me I can't understand why this is so as the code is very similar to code above it which runs perfectly.
One difference with your code:
$tag = $stream->get_tag("div");and the code right above it, e.g.:
$tag3 = $stream3->get_tag("span");is that your code is modifying the control variable for the main loop:
until ($tag->[1]{class} eq "officeFax")Are you aware of that?
To make trouble shooting easier, you should start deleting code. Delete everything not related to your problem. Are all those case blocks necessary? You should also probably get a fixed page of html that is fairly simple, and work on that. You should be able to whittle your code down to about 20 lines to isolate the problem.
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^2: Perl script not running through
by lordy (Initiate) on Nov 14, 2009 at 21:35 UTC |