Re: [PERL] lister

[Tim Jakobsen <sslug@sslug>]

Listerne indeholder strenge. Hvordan fjerner jeg (efter man har fundet 
to sammenfaldene værdi'er) den ene værdi i den ene liste? Jeg har
kigget på splice men der fjerner man jo kun den værdi den matcher... 

Claus Ekstrøm <sslug@sslug> writes:

> Hej.
> 
>  >Man har to lister. De to lister skal sammenlignes. Hvis der er to
> >sammenfaldene værdier skal værdien fjernes i den ene liste(Det er
> >altid den samme liste man fjerner fra.). Listernes længder varierer fra
> >gang til gang.
> 
> Jeg ville lave begge lister til hash'es og så checke på følgende måde:
> 
> #!/usr/local/bin/perl -w
> 
> @listea = (1, 2, 3, 4, 5, 6, 7, 8, 9);
> @listeb = (1, 2, 10, 11, 12, 13, 14, 15);
> 
> undef %hasha;
> undef %hashb;
> @sslug@sslug = @listea;
> @sslug@sslug = @listeb;
> 
> foreach (keys(%hasha)) {
>      if ($hashb{$_}) {
>          print "Match for $_\n";
>      }
> }
> 
> Mvh,
> 
> Claus
> 
> 

-- 
MvH.,
 Tim               <URL:http://www.kampsax.dtu.dk/>