- RU.PERL ----------------------------------------------------------- RU.PERL -
Msg : #1057 [644]
От : Misha Shiposh 2:5023/42.74 31 октября 03, 21:44
Кому : All 01 ноября 03, 05:31
Тема : рустекст
-------------------------------------------------------------------------------
#/-----/# · ···-=¬ Привет _All_ ! Пишет тебе *Misha* !
_*-----*_ L===============-----------------····· · · ·
возник вопрос, при реализации мысли...
каким образом в перле реализуется работа с кодировками? Конкретно интересует,
как сделать следущее.
while (<>) {
if (s/(\".+\")/\U$1\E/) {print file_2 $_;}
print file_2 $_;
}
close(file_2)
Вот как быть с этим если встречается русский текст? типа "привет" - надо в
верхний регистр. Может кто чего посоветует?
· ···-=¬ Hу я вроде все сказал... Bye _*All*_ !
L===============-----------------····· · · ·
... **->****->********->**************** - так плодяца зайцы!
--- Q3 - RulezZzZ Forever
* Origin: По спине лопатой нааа (2:5023/42.74)