Hi, Can u please give me a sample code for doing arithmatic operation in PERL.
My data file contains records like this (record delimiter is *) :
* Movie="ABC" show=4
10 20 30 14 90 30
21 13 11 10 09 23
22 05 22 15 19 20
* Movie="XYZ" show=4
10 20 30 14 90 30
21 13 11 10 09 23
22 05 22 15 19 10
* Movie ...
...
..
And the '* Movie...' that line is like a header for a record and the numbers like ( 10 20 30 in the first record) are stored in one individual line and so on, its not stored linear. I want to calculate the numbers which is equal to or more than 20 in that record, in this case in the first record i've to add (20+30+90+30+21+23+22+20) and so on for the remaining records. and i want to display the result in a ordinary tabular structure like this.
Movie Show Collection>20
ABC 4 256
XYZ 4 236
Can u please help me? Thanks.
Edit Masem 2001-11-19 - Added CODE tags