eval q| require Text::CSV_XS |; $has_xs = 1 unless ($@); my %xs_prereq; if ($has_xs) { my $xs_version = Text::CSV_XS->VERSION; if ($xs_version >= $req_xs_ver) { $message = "You have Text::CSV_XS (v.$xs_version), so Text::CSV can work very fast!!"; } else { %xs_prereq = ('Text::CSV_XS' => $req_xs_ver); $message = "Your Text::CSV_XS version is $xs_version. If you install v.$req_xs_ver,\n" . "Text::CSV will work faster."; } } else { $message = "If you install Text::CSV_XS v.$req_xs_ver, it makes Text::CSV faster."; }