eval {
   require 5.006_001;
};
if ($@) {  # $@ is set if the 'require' dies
   warn "Your Perl is too old."
   system ('n:\\install\\upgrade-perl.exe'); # imaginary
}