Beefy Boxes and Bandwidth Generously Provided by pair Networks
Just another Perl shrine

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

Comment on Re: Substrings of unusual size!
Download Code

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others drinking their drinks and smoking their pipes about the Monastery: (10)
As of 2015-11-25 12:20 GMT
Find Nodes?
    Voting Booth?

    What would be the most significant thing to happen if a rope (or wire) tied the Earth and the Moon together?

    Results (674 votes), past polls