On Wednesday, May 15, 2002, at 10:49 , Bob Showalter wrote:
Useless advice - the value of merit volks is TPS - Transactions
per Second - from this you can do resolutions through the known
TPK - turns per Knot - and solve the 3-bearing mo-board solution
for final firing solution... Unless you are
> >
> > sub unique{ [ keys {map { $_{$_} = 1 } @_ }] }
> ^^
>
> This returns a list of the results of the block { $_{$_} = 1 }
> as evaluated for each value in @_.
>
> But the value of the expression $_{$_} = 1 is always 1, to
> your map() is returnin
> -Original Message-
> From: Jackson, Harry [mailto:[EMAIL PROTECTED]]
> Sent: Wednesday, May 15, 2002 12:23 PM
> To: [EMAIL PROTECTED]
> Subject: Optimising for fun/speed not good code was Unique Lists
>
>
> Hi
>
> sub harryGrep
Hi
sub harryGrep {
return [ grep { not $\{$_}++ } @_ ];
}
It took me quite a while to find something quicker than the original grep
using the function I first tried and then I happened across a piece of text
talking about return contexts and tried the above. I also notic
