Re: FW: question -- beginner's programmer's block (your answer)

On Jan 3, Booher Timothy B 1stLt AFRL/MNAC said: >I hope this serves as an answer . . . Ok, I see. Then in your case, you'd probably want to do something like: for (split /\n/, $buffer) { ($field, $value) = split /\s*:\s+/; $field =~ s/^\s+//; $value =~ s/\s+$//; # do whateve

FW: question -- beginner's programmer's block (your answer)

I hope this serves as an answer . . . The original file is of this form: * foo *** thingA: 12 thingB: 23 thingC: 21 trial 1 colAcolBcolCcolD 1 23 28 273 227