Jenda Krynicky wrote:
>
> Guess what methods does this object support ;-)
>
> package Len;
>
> sub new {
> my $self;
> bless \$self, 'Len';
> }
>
> sub AUTOLOAD {
> $AUTOLOAD =~ s/^.*:://;
> return length($AUTOLOAD);
> }Nice one Jenda! But I couldn't find it on CPAN :-/ Rob -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
