file handling

Wed, 10 Feb 2010 22:51:44 -0800 

Hi,

 I have a program which reads the input file,updates once and outputs in a
new file.
Ex.The first line L1 will be updated to L2.
I need to put this into a loop so that the scripts will be invoked 1000
times and the
output contains the appended data(L1 TO L1000).
Please can you suggest few methods.

Thanks.
neelike.

     <Field ID="20000">
       <AttrSet ID="Core">
        <integer ID="ZoneId" Value="999" />
        <string ID="Name" Value="42_L1_Valid_Line_Indicator_20000" />
        <boolean ID="LinkedCoord" Value="false" />
        <integer ID="Type" Value="3" />
        <integer ID="x" Value="0" />
        <integer ID="y" Value="0" />
        <integer ID="w" Value="10" />
        <integer ID="h" Value="10" />
       </AttrSet>
     </Field>
     <Field ID="20001">
       <AttrSet ID="Core">
        <integer ID="ZoneId" Value="999" />
        <string ID="Name" Value="42_L1_Revenue_Code_20001" />
        <boolean ID="LinkedCoord" Value="true" />
        <integer ID="LinkedFieldId" Value="290" />
        <integer ID="LinkedLineId" Value="0" />
       </AttrSet>
     </Field>
     <Field ID="20003">
       <AttrSet ID="Core">
        <integer ID="ZoneId" Value="999" />
        <string ID="Name" Value="43_L1_Revenue_Description_20003" />
        <boolean ID="LinkedCoord" Value="true" />
        <integer ID="LinkedFieldId" Value="295" />
        <integer ID="LinkedLineId" Value="0" />
       </AttrSet>
     </Field>
     <Field ID="20004">
       <AttrSet ID="Core">
        <integer ID="ZoneId" Value="999" />
        <string ID="Name" Value="44_L1_HCPCS_Rates_Flag_20004" />
        <boolean ID="LinkedCoord" Value="false" />
        <integer ID="Type" Value="3" />
        <integer ID="x" Value="0" />
        <integer ID="y" Value="0" />
        <integer ID="w" Value="10" />
        <integer ID="h" Value="10" />
       </AttrSet>
     </Field>
     <Field ID="20005">
       <AttrSet ID="Core">
        <integer ID="ZoneId" Value="999" />
        <string ID="Name" Value="44_L1_HCPCS_Rates_Codes_20005" />
        <boolean ID="LinkedCoord" Value="true" />
        <integer ID="LinkedFieldId" Value="300" />
        <integer ID="LinkedLineId" Value="0" />
       </AttrSet>
     </Field>
     <Field ID="20006">
       <AttrSet ID="Core">
        <integer ID="ZoneId" Value="999" />
        <string ID="Name" Value="44_L1_HCPCS_Code_20006" />
        <boolean ID="LinkedCoord" Value="false" />
        <integer ID="Type" Value="3" />
        <integer ID="x" Value="0" />
        <integer ID="y" Value="0" />
        <integer ID="w" Value="10" />
        <integer ID="h" Value="10" />
       </AttrSet>
     </Field>
     <Field ID="20007">
       <AttrSet ID="Core">
        <integer ID="ZoneId" Value="999" />
        <string ID="Name" Value="44_L1_Modifier_1_20007" />
        <boolean ID="LinkedCoord" Value="false" />
        <integer ID="Type" Value="3" />
        <integer ID="x" Value="0" />
        <integer ID="y" Value="0" />
        <integer ID="w" Value="10" />
        <integer ID="h" Value="10" />
       </AttrSet>
     </Field>
     <Field ID="20008">
       <AttrSet ID="Core">
        <integer ID="ZoneId" Value="999" />
        <string ID="Name" Value="44_L1_Modifier_2_20008" />
        <boolean ID="LinkedCoord" Value="false" />
        <integer ID="Type" Value="3" />
        <integer ID="x" Value="0" />
        <integer ID="y" Value="0" />
        <integer ID="w" Value="10" />
        <integer ID="h" Value="10" />
       </AttrSet>
     </Field>
     <Field ID="20009">
       <AttrSet ID="Core">
        <integer ID="ZoneId" Value="999" />
        <string ID="Name" Value="45_L1_Service_Date_20009" />
        <boolean ID="LinkedCoord" Value="true" />
        <integer ID="LinkedFieldId" Value="310" />
        <integer ID="LinkedLineId" Value="0" />
       </AttrSet>
     </Field>
     <Field ID="20010">
       <AttrSet ID="Core">
        <integer ID="ZoneId" Value="999" />
        <string ID="Name" Value="44_L1_Rate_20010" />
        <boolean ID="LinkedCoord" Value="false" />
        <integer ID="Type" Value="3" />
        <integer ID="x" Value="0" />
        <integer ID="y" Value="0" />
        <integer ID="w" Value="10" />
        <integer ID="h" Value="10" />
       </AttrSet>
     </Field>
     <Field ID="20011">
       <AttrSet ID="Core">
        <integer ID="ZoneId" Value="999" />
        <string ID="Name" Value="46_L1_Service_Units_20011" />
        <boolean ID="LinkedCoord" Value="true" />
        <integer ID="LinkedFieldId" Value="315" />
        <integer ID="LinkedLineId" Value="0" />
       </AttrSet>
     </Field>
     <Field ID="20012">
       <AttrSet ID="Core">
        <integer ID="ZoneId" Value="999" />
        <string ID="Name" Value="46_L1_Service_Units_Qualifier_20012" />
        <boolean ID="LinkedCoord" Value="false" />
        <integer ID="Type" Value="3" />
        <integer ID="x" Value="0" />
        <integer ID="y" Value="0" />
        <integer ID="w" Value="10" />
        <integer ID="h" Value="10" />
       </AttrSet>
     </Field>
     <Field ID="20013">
       <AttrSet ID="Core">
        <integer ID="ZoneId" Value="999" />
        <string ID="Name" Value="47_L1_Total_Charges_20013" />
        <boolean ID="LinkedCoord" Value="true" />
        <integer ID="LinkedFieldId" Value="320" />
        <integer ID="LinkedLineId" Value="0" />
       </AttrSet>
     </Field>
     <Field ID="20015">
       <AttrSet ID="Core">
        <integer ID="ZoneId" Value="999" />
        <string ID="Name" Value="48_L1_Non_Covered_Charges_20015" />
        <boolean ID="LinkedCoord" Value="true" />
        <integer ID="LinkedFieldId" Value="325" />
        <integer ID="LinkedLineId" Value="0" />
       </AttrSet>
     </Field>
     <Field ID="20017">
       <AttrSet ID="Core">
        <integer ID="ZoneId" Value="999" />
        <string ID="Name" Value="49_L1_Reserved_20017" />
        <boolean ID="LinkedCoord" Value="true" />
        <integer ID="LinkedFieldId" Value="330" />
        <integer ID="LinkedLineId" Value="0" />
       </AttrSet>
     </Field>

Attachment: Converter.pl
Description: Binary data

-- 
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/

Reply via email to