Portée :: supérieure Agir sur les champs supérieurs
Télécharger maintenant

Portée :: supérieure Classement & Résumé

Portée :: supérieure Mots clés

Module Perl perl Plus haut portée étendues supérieures

Portée :: supérieure La description

Agir sur les champs supérieurs Synopsis Package x; Utilisation Scope :: Upper QW / Reap localise localize_elem localize_delete: mots /; Sub Desc {Shift -> {Desc}} SUB SET_TAG {MY ($ DESC) = @_; # Premier localiser x $ x afin qu'il soit détruit dernier localize '$ x' => bénisse ({desc => $ desc}, __Package__) => up; # une portée up up récol sous {my $ pkg = appelant; mon $ x = do {pas strict 'Refs'; $ {$ pkg. ':: x'}}; # Obtenir le $ x dans la portée d'impression $ x-> Desc. ": Fini ";} => Portée 1; # même qu'à haut ici localize_elem '% Sig', '__warn__' => Sub {My $ pkg = appelant; mon $ x = {pas strict 'refs'; $ {$ pkg"; :: x '}}}; # obtenir le $ x dans le noyau d'étendue :: avertir ($ x-> desc.': '. Joindre (' ', @_));} => Appelant 0; # même que Ici # Supprimer le dernier élément @argv localize_delete '@argv', -1 => up inférieur ici; # même que le paquet y; {x :: set_tag ('tarte'); # $ x est maintenant un objet x et @Argv a un élément moins averti de ce que '; ce que'; # avertit "tarte: qu'est-ce que ..." ...} # "tarte: fait" est un package imprimé Z; utilisation de l'utilisation :: supérieure qw / détente want_at: mots /; SUB ESSAYE () {MON @RESULT = SHIFT -> (); My $ CX = Sub Up Sub; Downd + (Want_AT ($ CX)? @Result: scalaire @RESULT) => $ CX;} ... Sub Zap {Essayez {retour @things; # retourne pour essayer () puis à l'extérieur de zap () # pas atteint} # pas atteint} # pas atteint} mon @what = zap () # @Quecope :: supérieure est un module de perl qui vous permet de différer des actions au moment de l'exécution qui auront lieu lorsque le flux de contrôle revient dans une portée supérieure. Actuellement, vous pouvez: * Crocher un UPPE r mettre fin avec "récolte"; * localiser des variables, des valeurs de tableau / hachage ou des suppressions d'éléments dans des contextes supérieurs avec respectivement "localiser", "localize_elem" et "localisze_delete"; * Renvoie les valeurs immédiatement à un niveau supérieur avec "se détendre" et savoir quel contexte était utilisé alors avec "want_at". Exigences: · Perl

Portée :: supérieure Logiciels associés