SV: [PERL] string med numre > given værdi

[Jørgen Altmann <sslug@sslug>]

Hej Peter

Dette er èn af de mange løsningsforslag:
	  
	  $test  = -3;
	  $antal =  0;
	  @str = split(' ',$str);
	  foreach(@str){ $antal += ($_ > $test) };

Jørgen Altmann
sslug@sslug
 

> -----Oprindelig meddelelse-----
> Fra:	Peter Lindstrøm [SMTP:sslug@sslug
> Sendt:	6. juli 2000 11:55
> Til:	sslug@sslug
> Emne:	[PERL] string med numre > given værdi
> 
> Hej
> 
> Jeg har en streng der kunne se således ud
> $str="-17 -4 -2 1 4 5 76"; (Den er altid sorteret og sepereret af 1
> space)
> 
> Hvordan finder jeg nemmest antallet af tal i strengen der er større end
> et givet tal, eks -3. 
> 
> I ovenstående streng skulle rutinen reurnere 6. [Jørgen Altmann]  Du mener
> 5 ikke? 
> Mvh
> Peter
> sslug@sslug