Select Code to Download

 0:33 >perl -we "use feature 'switch'; my $c = 42; given ($c) { when (
+$_ < 50) { print 'Yes!' } }"
given is experimental at -e line 1.
when is experimental at -e line 1.
Yes!
 0:33 >

no warnings 'experimental::smartmatch';