$ perl -E '
    use strict;
    use experimental "switch";
    use warnings;

    given (1) { say "Hello" }
'
given is experimental at -e line 6.
Hello