Die given-Anweisung
Die given-when-Kontrollstruktur ermöglicht es Ihnen, einen Codeblock auszuführen, wenn die mit given angegebene Bedingung erfüllt ist. Dies ist Perls Entsprechung für die switch-Anweisung aus C – aber natürlich wesentlich »perliger«. Sie ist ein wenig extravaganter, und deshalb hat sie auch einen ausgefalleneren Namen.
Hier ein wenig Code, der in $ARGV[0] das erste auf der Kommandozeile angegebene Argument übernimmt und danach auf der Suche nach Fred eine Reihe von when-Bedingungen durchläuft. Jeder when-Block hat seine eigene Methode Fred zu finden. Die Stärke der Einschränkung nimmt nach unten hin zu:
use 5.010001; given ( $ARGV[0] ) { when ( 'Fred' ) { say 'Der Name ist Fred'} when ( /fred/i ) { say 'Der Name enthält fred' ...Get Einführung in Perl, Sixth Edition now with the O’Reilly learning platform.
O’Reilly members experience books, live events, courses curated by job role, and more from O’Reilly and nearly 200 top publishers.
