perl 5.14 smart matching
use Dancer ':syntax';
use v5.14;
...
my @options = qw ( func_overload allow_url_fopen );
my $p = params->{'...'};
return redirect '...' unless $p and $p ~~ ['func_overload', 'allow_url_fopen']; # работает
return redirect '...' unless $p and $p ~~ qw ( func_overload allow_url_fopen ); # не работает
return redirect '...' unless $p and $p ~~ @options; # работаетПрелесть какая!