Quote:
Originally Posted by Tempest
Don't know why you're using Tokeparser for this...
Code:
$lchtml = lc($html);
$start = index($lchtml, '<table');
$end = index($lchtml, '</table>') + 8;
$table = substr($html, $start, $end - $start);
|
I don't know why I'm using TokeParser for this either. I've just been on a google mission all day slowly stepping closer to getting my goal achieved. I'm pretty new to Perl, and real coding in general. I had a good Perl mentor for a while, but he up and disappeared for the last few days so I've been busting ass on google trying to accomplish my aims here. Never tried to manipulate a page before.
I got some help and have achieved my goal using HTML::TreeBuilder though. Everything has been running just skippy. I'm gonna look mor einto what you've given me though, looks as though it'd shave a few lines off my code...