On Tue, 20 Jan 2004 13:39:44 -0500
"Anthony J Segelhorst" <[EMAIL PROTECTED]> wrote:
> I have the following output, and each value that is separated by comma is
> a variable:
>
> servera,serverb,109,aix4-r1,server
> servera,serverb,109,aix4-r1,server
> servera,serverb,109,aix4-r1,server
> servera,serverb,109,aix4-r1,server
> servera,serverb,109,aix4-r1,server
> servera,serverb,109,hpux10,server
> servera,serverb,109,solaris2,server
>
> I am trying to set up a counter that would actually output the data to be:
>
> servera,serverb,109,aix4-r1,server,5
> servera,serverb,109,hpux10,server,1
> servera,serverb,109,solaris2,server,10
>
> Does anyone any suggestion on how to set up a counter to count the lines
> until a different line shows up. I already have the list sorted, so I
system ("uniq $file_with_duplicates $file_sans_duplicates");
Then work on $file_sans_duplicates
--
Owen
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
