Help for this page
use if (not $] < 5.006) => 'warnings';
BEGIN { if (not $] < 5.006) { require warnings; warnings->import } }