$self->SUPER::HANDLE_foo_ATTRIBUTES()

##</code><code>##

  push @{$caller.'::ISA'}, 'typesafety';

##</code><code>##

    my $name = (($curcv->PADLIST->ARRAY)[0]->ARRAY)[$targ];  
    return unless $name->can('SvSTASH'); 
    my $type = $name->SvSTASH->NAME;


##</code><code>##


  my FooBar $bar;