- RU.PERL ----------------------------------------------------------- RU.PERL -
Msg : #1038 [644]
От : Сергей Ларионов 2:5020/400 31 октября 03, 07:21
Кому : eugene v. 01 ноября 03, 05:31
Тема : Re: Как посимвольно обработаь строку
-------------------------------------------------------------------------------
From: "Сергей Ларионов"
Привет всем !
"eugene v." сообщил/сообщила в
новостях следующее: news:1067561906@p1.f245.n5025.z2.ftn...
> так и я могу, мне бы посимвольно.
Если нужна действительно посимвольная обработка, то может быть так сделать :
my $a="This is text";
while ( $a =~ /(.)/g )
{
print $1;
print "z";
}
Tzhzizsz zizsz ztzezxztz
WBR !
Сергей Ларионов
--- ifmail v.2.15dev5
* Origin: Tomsktelecom - Digital Networks (2:5020/400)