use if 'aix' eq $^O, Text::CVS;
use if 'aix' ne $^O, Text::CVS_XS;