use if $] < 5.008, "utf8";
use if WANT_WARNINGS, warnings => qw(all);