Help for this page
use 5.010;
use feature 'switch';
no if $] >= 5.018, warnings => "experimental::feature_name";
no if $] >= 5.018, warnings => "experimental::switch";
Unknown warnings category 'experimental::switch' at ... BEGIN failed--compilation aborted at ...
no if $] >= 5.018, warnings => "experimental::smartmatch";
given is experimental at ... when is experimental at ... when is experimental at ... when is experimental at ...
#!/usr/bin/env perl -l ... state $word_for = {qw{1 One 2 Two 3 Three}}; return $word_for->{+shift} || 'Other'; }
*** test1() *** 0 is Other ... 2 is Two 3 is Three 4 is Other
www.com | www.net | www.org
No recent polls found