Given / when ('switch' statements)

Perl 5 doesn't have a 'switch' statement.

Perl 6 uses 'given' and 'when':

given EXPR {
   when EXPR { ... }
   when EXPR { ... }
   default { ... }
}

• 'given' sets the topic ($_)

• 'when' smart matches its argument against $_
• if true, invoke the corresponding block and exit surrounding block