Craig A. Berry [Fri, 14 Jul 2006 18:18:18 +0000 (18:18 +0000)]
p4raw-id: //depot/perl@28575
skip "No setlocale", 24;
} elsif (!setlocale(&POSIX::LC_ALL, "en_GB.ISO8859-1")) {
skip "Could not setlocale to en_GB.ISO8859-1", 24;
- } elsif ($^O eq 'dec_osf') {
+ } elsif ($^O eq 'dec_osf' || $^O eq 'VMS') {
skip "$^O has broken en_GB.ISO8859-1 locale", 24;
} else {
use locale;