#given EXPR BLOCK

#given BLOCK

given is analogous to the switch keyword in other languages. given and when are used in Perl to implement switch/case like statements. Only available after Perl 5.10. For example:

use v5.10;
given ($fruit) {
    when (/apples?/) {
        print "I like apples."
    }
    when (/oranges?/) {
        print "I don't like oranges."
    }
    default {
        print "I don't like anything"
    }
}

See "Switch statements" in perlsyn for detailed information.

Perldoc Browser is maintained by Dan Book (DBOOK). Please contact him via the GitHub issue tracker or email regarding any issues with the site itself, search, or rendering of documentation.

The Perl documentation is maintained by the Perl 5 Porters in the development of Perl. Please contact them via the Perl issue tracker, the mailing list, or IRC to report any issues with the contents or format of the documentation.