diff options
| author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-12-20 19:37:26 +0000 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-12-20 19:37:26 +0000 |
| commit | 0bcc798661c94fefec5a89ff3321c5a519313444 (patch) | |
| tree | 12268f22edb8adab4dd9328f88ed15254fbdf1ca /ext/POSIX | |
| parent | 5069cc751dbf8ccfb2c6036830812437af90a09b (diff) | |
| download | perl-0bcc798661c94fefec5a89ff3321c5a519313444.tar.gz | |
Fix typos in regular expressions
p4raw-id: //depot/perl@26424
Diffstat (limited to 'ext/POSIX')
| -rw-r--r-- | ext/POSIX/t/time.t | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ext/POSIX/t/time.t b/ext/POSIX/t/time.t index c09a37540a..103a161963 100644 --- a/ext/POSIX/t/time.t +++ b/ext/POSIX/t/time.t @@ -21,10 +21,10 @@ SKIP: { $^O eq "MSWin32" || $^O eq "dos" || $^O eq "interix"; tzset(); my @tzname = tzname(); - like($tzname[0], qr/[GMT|UTC]/i, "tzset() to GMT/UTC"); + like($tzname[0], qr/(GMT|UTC)/i, "tzset() to GMT/UTC"); SKIP: { skip "Mac OS X/Darwin doesn't handle this", 1 if $^O =~ /darwin/i; - like($tzname[1], qr/[GMT|UTC]/i, "The whole year?"); + like($tzname[1], qr/(GMT|UTC)/i, "The whole year?"); } } |