http://www.perlmonks.org?node_id=657968


in reply to Perl 5.10: switch statement demo

That doesn't look like a particularly apt illustration of given/when anyway, since it completely circumvents given's smart matching. It certainly doesn't look any better than 

        $_ % 3 or push @what, 'fizz';
        $_ % 5 or push @what, 'buzz';
        $_ % 7 or push @what, 'sausage';

[download]
which, as you pointed out, DWYM in this case, while given/when doesn't.

A word spoken in Mind will reach its own level, in the objective world, by its own weight

In Section Seekers of Perl Wisdom