Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw

Re: How to deal with long line

by chester (Hermit)
on Sep 27, 2005 at 20:47 UTC ( #495550=note: print w/ replies, xml ) Need Help??

in reply to How to deal with long line

Here's one way that reads in the string a little bit at a time, which is good if your data is very large. Mostly untested, but works for your data:

use warnings; use strict; my @wanted_substrings; { local $/ = 'END'; while(my $string = <DATA>) { push @wanted_substrings, ($string =~ /START(.*)END/); } } print "@wanted_substrings"; __DATA__ somecharSTARTfvENDsomecharSTARTsvENDsomecharSTARTtvENDsomechar

Comment on Re: How to deal with long line
Download Code

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://495550]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others romping around the Monastery: (7)
As of 2014-12-21 21:18 GMT
Find Nodes?
    Voting Booth?

    Is guessing a good strategy for surviving in the IT business?

    Results (108 votes), past polls