Behalf Of Paul Makepeace
Sent: 07 July 2001 01:48
>
> On Thu, Jul 05, 2001 at 12:36:56PM +0100, Lee Goddard wrote:
> > react if member($_,@_) ;
> > sub member { my $target = shift;
> > for (0..$#_){
> > return $_ if $_[$_] eq $target;
> > }
>
> for (@_) {
> return $_ if $_ eq $target
> }
>
> /me hates $# :)
And why not? I hate the way my text editor mistakes the hash in $# for a comment
symbol.
Really dunno why I didn't plump for the simpler option there: I can only put it down
as a fossil of a former thought, whose flssh
has been stripped.
> In total darkness, or in a very large room, very quietly
Lee
--
perl -e -MMusic::Scales::Phyrgian;MIDI::Simpler;play;notes(100,101
,100,101,100,101,100,99,99,100,101,101,100,99,101,100);
