unshift @INC, "$root/perl"; # this IS the right way round!
unshift @INC, "$root/local";
$is_win = ($^O =~ /^MS/ || $^O =~ /^OS-2/) ? 1 : 0; # is it Windows?
unshift @INC, "$root/perl"; # this IS the right way round!
unshift @INC, "$root/local";
$is_win = ($^O =~ /^MS/ || $^O =~ /^OS-2/) ? 1 : 0; # is it Windows?