--- db/prgsrc/eq/Attic/findequal.pl 2001/05/18 22:53:03 1.8 +++ db/prgsrc/eq/Attic/findequal.pl 2001/05/18 22:56:20 1.9 @@ -33,14 +33,14 @@ use POSIX qw (locale_h); do "common.pl"; my ($thislocale); -if ($^O ~= /win/i) { +if ($^O =~ /win/i) { $thislocale = "Russian_Russia.20866"; } else { $thislocale = "ru_RU.KOI8-R"; } POSIX::setlocale( &POSIX::LC_ALL, $thislocale ); if ((uc 'Á') ne 'á') {die "!Koi8-r locale not installed!\n"}; -} + if ((uc 'Á') ne 'á') {die "!Koi8-r locale not installed!\n"};