Hi, 
 
Juerd <juerd <at>  convolution.nl> writes: 
>  Piers Cawley skribis 2005-06-23 15:30 (+0100): 
>  > Brent 'Dax' Royal-Gordon <brentdax <at> gmail.com> writes: 
>  > > As I've said before, Perl supports `alias`--it's just spelled `:=`. 
>  > Here's a rubyish idiom: 
>  >   my &old_behaviour := &function; 
>  >   &function := sub { try_some_stuff || &old_behaviour } 
>  > Except, with binding it doesn't work like that, you end up with an 
infinite 
>  > loop.  
>   
>  I still think subs should have a value, than can be copied :) 
>   
>      my &old_behaviour = &function; 
>      &function = sub { try_something || &old_behaviour }; 
 
I absolutely agree! 
 
But: Your example won't work correctly, as function() would 
return a Code reference (&old_behaviour) instead of calling 
old_behaviour, wouldn't it? 
 
I think all of the following should work: 
 
    my &old_behaviour = &function; 
    &function = sub { try_something() || old_behaviour() }; 
 
    my &old_behaviour = &function; 
    &function := sub { try_something() || old_behaviour() }; 
 
Additionally, with nothingmuch's lazy {...} proposal, the 
following should work, too (I think): 
 
    my &old_behaviour = &function; 
    &function = lazy { &try_something || &old_behaviour }; 
 
    my &old_behaviour = &function; 
    &function := lazy { &try_something || &old_behaviour }; 
 
 
--Ingo 
 
--  
Linux, the choice of a GNU | When cryptography is outlawed, bayl bhgynjf 
generation on a dual AMD   | jvyy unir cevinpl!   
Athlon!                    |