A voir également:
- Switch en perl
- Android switch - Accueil - Android
- Smart switch pc - Télécharger - Divers Bureautique
- Switch off - Télécharger - Divers Utilitaires
- Switch 2 - Accueil - Jeu vidéo
- Switch qwerty azerty - Guide
1 réponse
là : https://www.perl.com/doc/FMTEYEWTK/style/slide37.html/
Perl Style: Learn to Switch with for
* Though Perl has no built-in switch statement, this is not a hardship but an opportunity.
* It's easy to build one. The word `for' is sometimes pronounced `switch'.
SWITCH: for ($where) {
/In Card Names/ && do { push @flags, '-e'; last; };
/Anywhere/ && do { push @flags, '-h'; last; };
/In Rulings/ && do { last; };
die "unknown value for form variable where: `$where'";
}
* Like a series of elsifs, a switch should always have a default case, even if the default case `can't happen'.
Forward to Switch by Using do{} Creatively
Back to Closures
Up to index
Perl Style: Learn to Switch with for
* Though Perl has no built-in switch statement, this is not a hardship but an opportunity.
* It's easy to build one. The word `for' is sometimes pronounced `switch'.
SWITCH: for ($where) {
/In Card Names/ && do { push @flags, '-e'; last; };
/Anywhere/ && do { push @flags, '-h'; last; };
/In Rulings/ && do { last; };
die "unknown value for form variable where: `$where'";
}
* Like a series of elsifs, a switch should always have a default case, even if the default case `can't happen'.
Forward to Switch by Using do{} Creatively
Back to Closures
Up to index
