Select Code to Download

  $self->SUPER::HANDLE_foo_ATTRIBUTES()

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

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

  my FooBar $bar;