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

Re: Substrings of unusual size!

by Anonymous Monk
on Oct 09, 2013 at 15:26 UTC ( #1057571=note: print w/replies, xml ) Need Help??

in reply to Substrings of unusual size!

Could you possibly change the title to be more descriptive? (I don't care to spend time what that would be.)

Pseudocode ...

open file while reading file line by line in @data, save lines from /^G/ (inclusive) to next /^G/ (exclusive) call parse_check on @data close file in parse_check, $data[0] =~ /^G/ or early return @find = split $data[0] on ":" remove /^G/ from $find[0] @field = parsed CSV output of @data[1,$#data]. remove /^E/ from @field for space in @field match space with each of @find if all succeed, well, you succeeded and return true outside of loop, return false

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1057571]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others pondering the Monastery: (3)
As of 2018-03-19 01:35 GMT
Find Nodes?
    Voting Booth?
    When I think of a mole I think of:

    Results (231 votes). Check out past polls.