sub AUTOLOAD{
    my $self = shift;
    my $fname = do{
        our $AUTOLOAD =~ /(\w+)$/;
        $1;
    };