RE: skip/delete lines with dup keys
- From: jkipp5@xxxxxxxxxxx (Jim)
- Date: Thu, 28 Jul 2005 00:24:24 -0400
------
> >
> > # file already sorted by $id
> > my $cur_id = '';
> > while (<F>) {
> > chomp;
> > ($id,$score,$bal) = split (/,/, $_);
> > next if $cur_id == $id;
> > print OUT "$id,$score,$bal\n";
> > $cur_id = $id;
> > }
>
> Don't fix it if it's not broken. :-)
>
>
Thanks John and Jeff. Just thought there may be a better way.
.
- References:
- Re: skip/delete lines with dup keys
- From: John W. Krahn
- Re: skip/delete lines with dup keys
- Prev by Date: Re: system v backticks
- Next by Date: using ping on Net module
- Previous by thread: Re: skip/delete lines with dup keys
- Next by thread: Re: skip/delete lines with dup keys
- Index(es):
Relevant Pages
|
