Brad Baxter wrote:
> Amit Saxena wrote:
>> #! /usr/bin/perl
>>
>> use warnings;
>> use strict;
>>
>> open (PTR1, "<filename.txt") or die "Unable to open file filename.txt :
>> $!\n\n";
>>
>> while (chomp ($str = <PTR1>))
>> {
>> sscanf($str, "%5d %11.2f", $data1, $data2);
>>
>> # do whatever processing.....
>> }
>>
>> close (PTR1);
>>
>> Regards,
>> Amit Saxena
>>
>
>
> sscanf()?
Hehe I missed that one!
Rob
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
