TIE :: SUB Een subroutine, functie of methode aan een hash
Download nu

TIE :: SUB Rangschikking & Samenvatting

TIE :: SUB Tags

Perl-module perl hash subroutine

TIE :: SUB Beschrijving

Das :: sub is een perl-module die een subroutine aan een hash routines bindt. De subroutine wordt uitgevoerd bij Fetch Hash. Op lange laatste is dit hetzelfde, alleen de notatie is korter.alternatief voor "... $ {\ subroutine ('ABC')} ..." # of "... @ { } ... " # of '...' . Subroutine ('ABC'). '...' Schrijf "... $ Subroutine {abc} ..." Soms verwacht de subroutine meer dan 1 parameter. Dien vervolgens een referentie in op een array als 'Hash-toets'. De gebonden subroutine krijgt de parameters altijd als lijst. Gebruik elke verwijzing naar meer dan 1 retourwaarde. De beller krijgt deze referentie terug. Er is geen manier om een lijst te retourneren. Synopsisinitialize gebruik strikt; gebruik waarschuwingen; Gebruik TIE :: sub; Bind mijn% subroutine, 'TIE :: sub', sub {...}; of initialiseer late stropdas mijn% subroutine, 'Tie :: sub'; (Betand% Subroutine) -> Config (sub {...}); of initialiseer te laat, mijn $ object = Bind mijn% subroutine, 'TIE :: sub'; $ Object-> Config (sub {...}); Interpolate subroutines in een snijderachtige functie (slechts 1 retourparameter) strikt; gebruik waarschuwingen; Gebruik TIE :: sub; Bind mijn% Sprintf_04D, 'Tie :: sub', sub {Sprintf 'D', Shift}; # De HASH-sleutel en retourwaarde zijn beide scalars. Print "Zie $ SprintF_04D {4}, geen $ Sprintf_04D {5} cijfers."; __END__ OUTPUT: zie 0004, geen 0005 cijfers. Flexibeler gebruik strikt; gebruik waarschuwingen; Gebruik TIE :: sub; Bind mijn% Sprintf, 'Tie :: sub', sub {sprintf shift, shift}; # De HASH-toets is een array-referentie, de retourwaarde is een scalaire. Print "zie $ Sprintf {} cijfers."; __END__ Uitgang: zie 0004 cijfers.usage zoals subroutine strikt gebruik; gebruik waarschuwingen; Gebruik TIE :: sub; Gebruik Engelse QW ($ LIST_SEPARATOR); Bind mijn% sprintf_multi, 'Tie :: sub', sub {return! @_? q {}: @_> 1? : sprintf "d \ n", verschuiving; }; # De HASH-sleutel en de retourwaarde zijn beide scalaire of array-referenties. {Gebruik Engelse QW ($ LIST_SEPARATOR); Lokale $ List_Separator = q {}; print <<"eot"; bekijk de volgende regels scalar $ sprintf_multi {10} arrayref @ {$ sprintf_multi {}} en wees geluk eot} __end__ output: zie de volgende regels scalaire 0010 arrayref 002000210022 en wees geluk gebruik zoals methode die strikt wordt gebruikt; gebruik waarschuwingen; gebruik tie :: sub; gebruik cgi; mijn $ cgi = cgi-> nieuw; Bind mijn% CGI, 'Tie :: sub', sub {My ($ methode, @params) = @_; mijn @result = $ cgi-> $ -methode (@params); opbrengst ! @resultaat ? (): @result> 1? \ @Result: $ resultaat ; }; # HASH-sleutel en retourwaarde zijn beide array-referenties. print <<"eot"; hallo $ cgi {} $ CGI {}! EOT __END__ Uitgang Als "http: //.../noname.pl? FirstName = SteffenlastName = Winkler": Hallo Steffen Winkler! Lees Configuratie Mijn $ config = (gebonden% subroutine) -> Config; schrijfconfiguratie Mijn $ configuratie = ( gebonden% subroutine) -> Config (sub {yourcode}); Homepage van het product

TIE :: SUB Gerelateerde software