BEGIN { require 5.004; die "Requires only 5.004" if int($] * 1000) > 5004; }