Select Code to Download

sub define_vocabulary {
    no strict "refs";
...
        *{$_ . "_"} = sub($) { _attr($name, @_) };
    }
}