this is an interesting question in that its not about syntax or a specific
problem in perl.

here's the algorithm:

while there are lines to read from the input
        read a line
        split the line into two seperate strings around the colon
        if both strings are numbers
                append the first string into array1
                append the second string into array2

that is "how you do this", or at least one way...=)

sudhindra k s wrote:

>  
> Hi
> 
> I have an output which looks like this:
> 
> Tag       : Result
> 146603    :
> 147020    :
> 147155    : NONE
> 147160    :
> 147232    :
> 147243    :
> 147254    : none
> 147318    :
> 147341    : NONE
> 147430    : N/A
> 147708    :
> 147710    : 0000
> 147729    :
> 147768    :
> 147851    :
> 147921    :
> 147949    : 0000
> 147981    :
> 147983    :
> 147991    :
> 148007    : 0000
> 148080    :
> 148105    :
> 148200    :
> 148312    : 38160
> 148329    : 44139
> 148444    : NONE
> 148514    :
> 148573    : 0000
> 148697    :
> 148759    :
> 148919    :
> 148920    :
> 148921    :
> 148923    :
> 148924    :
> 148933    :
> 148934    :
> 148935    :
> 148936    :
> 148937    :
> 148938    :
> 148939    :
> 148951    :
> 148996    :
> 
> Now i want to gather all the "Tags" for which the "Result" is a number
> (but shouldnt include the tag if the result is 0). The corresponding
> Result should go to another array.
> 
> Considering the above example my array1 should contain 148312 and 148329
> and array2 should contain 38160 and 44139
> 
> How do i do this?
> 
> Thanks in advance
> 
> Regards
> Sudhindra



-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>


Reply via email to