On Thu, 28 Sep 2000, David L. Nicol wrote:
[snip] 
 
>    sub speak { print "kerokero"; }
> 
>    foreach (?????) {  # go through all the methods defined in Frog::Frog
>                       # I know there is a way to do this but do not know what it is

See RFC 335 (v1): Class Methods Introspection: what methods does this object
support?

>       #next if $_ eq speak;  
>       next if defined \&$_; 
>       eval "sub $_ { return &Frog::Frog::$_ @_ }";
>    };
[snip]

___________________________________________________
Mark Summerfield   http://www.netcraft.com/newsfeed
>>Written in my private capacity on my own behalf<<
                 http://www.perlpress.com (Perl)
                http://www.ourobourus.com (Python)

Reply via email to