diff options
| author | Karl Williamson <khw@cpan.org> | 2016-07-26 13:28:51 -0600 |
|---|---|---|
| committer | Karl Williamson <khw@cpan.org> | 2016-08-01 15:52:48 -0600 |
| commit | 8eb6215e5e1b153ff0c10c3ab5e4b7b1455cd472 (patch) | |
| tree | ece297db0611667a0b6ce09e5f96fb2ada899515 /lib/locale.t | |
| parent | d35c1b5e43e773f353239d9182ddccb41cdab3d6 (diff) | |
| download | perl-8eb6215e5e1b153ff0c10c3ab5e4b7b1455cd472.tar.gz | |
lib/locale.t: Clarify debug output
Diffstat (limited to 'lib/locale.t')
| -rw-r--r-- | lib/locale.t | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/locale.t b/lib/locale.t index 727d7f9c26..18be0ecb99 100644 --- a/lib/locale.t +++ b/lib/locale.t @@ -1024,13 +1024,13 @@ foreach my $Locale (@Locale) { debug ":cased: = ", disp_chars(@{$posixes{'cased'}}), "\n"; debug ":alpha: = ", disp_chars(@{$posixes{'alpha'}}), "\n"; debug ":alnum: = ", disp_chars(@{$posixes{'alnum'}}), "\n"; - debug " w = ", disp_chars(@{$posixes{'word'}}), "\n"; + debug ' \w = ', disp_chars(@{$posixes{'word'}}), "\n"; debug ":graph: = ", disp_chars(@{$posixes{'graph'}}), "\n"; debug ":print: = ", disp_chars(@{$posixes{'print'}}), "\n"; - debug " d = ", disp_chars(@{$posixes{'digit'}}), "\n"; + debug ' \d = ', disp_chars(@{$posixes{'digit'}}), "\n"; debug ":xdigit: = ", disp_chars(@{$posixes{'xdigit'}}), "\n"; debug ":blank: = ", disp_chars(@{$posixes{'blank'}}), "\n"; - debug " s = ", disp_chars(@{$posixes{'space'}}), "\n"; + debug ' \s = ', disp_chars(@{$posixes{'space'}}), "\n"; debug ":punct: = ", disp_chars(@{$posixes{'punct'}}), "\n"; debug ":cntrl: = ", disp_chars(@{$posixes{'cntrl'}}), "\n"; debug ":ascii: = ", disp_chars(@{$posixes{'ascii'}}), "\n"; |