ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Vladimir Podgorny                    2:5020/400     23 Jan 2002  11:59:33
 To : Pavel Zheltouhov
 Subject : Re: regex & 5.6.0
 -------------------------------------------------------------------------------- 
 

 Pavel Zheltouhov <pavlo@tvrn.ru> wrote:
 
 > Следующий код работает по разному на perl5.6.0 и 5.005_03
 > 
 > #!/usr/bin/perl -w
 > use strict;
 > my $long="DISTRICT OF COLUMBIA";
 > $long=~s/\b(.)(.+?)\b/\U$1\E\L$2\E/g;
 > print "$long\n";
 > 
 > на 5.6.0 выводит 
 > District Of Columbia
 > на 5.005_03
 > District of columbia
 > 
 > разъясните, пожалуйста, что я не так делаю.
 
 [raven@t-rex - 09:57:13 Wed Jan 23 /tmp]
 $ cat test.pl 
 #!/usr/bin/perl -wT
 use strict;
 use POSIX qw(locale_h);
 setlocale(LC_ALL,'C');
 
 my $long="DISTRICT OF COLUMBIA";
 $long=~s/\b(.+?)\b/\u\L$1\E/g;
 print "$]: $long\n";
 
 [raven@t-rex - 09:57:15 Wed Jan 23 /tmp]
 $ ./test.pl 
 5.006: District Of Columbia
 
 ...
 
 [raven@cardinal - 09:57:52 Wed Jan 23 /tmp]
 $ ./test.pl 
 5.00503: District Of Columbia
 
 > -- 
 > Pavlo
 
 -- 
 VP992-RIPE
 --- ifmail v.2.15dev5
  * Origin: Adamant ISP news server (2:5020/400)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

Тема:    Автор:    Дата:    regex & 5.6.0   Pavel Zheltouhov   22 Jan 2002 22:46:29   Re: regex & 5.6.0   Vladimir Podgorny   23 Jan 2002 11:59:33   Re: regex & 5.6.0   Pavel Zheltouhov   23 Jan 2002 21:33:00   Re: regex & 5.6.0   Vladimir Podgorny   24 Jan 2002 11:23:47