Beefy Boxes and Bandwidth Generously Provided by pair Networks Joe
more useful options
 
PerlMonks  

Re: Dividing HTML up into chunks

by srawls (Friar)
on Jun 28, 2001 at 02:09 UTC ( [id://92155]=note: print w/replies, xml ) Need Help??

This is an archived low-energy page for bots and other anonmyous visitors. Please sign up if you are a human and want to interact.


in reply to Dividing HTML up into chunks

Note: untested code, written as I post. 
open FH, "$file";
{
  local $/;
  $text = <FH>;
}
for($text =~ /<A NAME="([^"]+)">(.*?)(?!<A NAME=")/) {
  #file name is $1
  #text is $2
}

[download]
Note, I saved time and used .*?. See death to dot star for why not to do that. Also, look at unrolling the loop. I leave that as an exercise to you, because I can't just hand you everything now can I : )

The 15 year old, freshman programmer,
Stephen Rawls

In Section Seekers of Perl Wisdom

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?

www.com | www.net | www.org
Node Status?
node history
Node Type: note [id://92155]
help
Sections?
Information?
Find Nodes?
Leftovers?
    Notices?
    • hippo‥ epoptai's answer Re: how do I set a cookie and redirect was blessed by hippo!
    • erzuuli‥ Anonymous Monks are no longer allowed to use Super Search, due to an excessive use of this resource by robots.