BEGIN { die "Unsupported version of Perl\n" if $] >= 5.000000 }