use 5.010;

##</code><code>##

BEGIN {
   $] >= 5.010
      or die "Perl v5.10.0 required--this is only $^V, stopped";
}

use feature qw( :5.10 );

##</code><code>##

BEGIN {
   $] >= 5.010
      or die "Perl v5.10.0 required--this is only $^V, stopped";
}

use feature qw( array_base say state switch );