note 70352 deleted from ref.mbstring by bjori
| From: | bjori@php.net | Date: | Thu, 12 Oct 2006 17:19:56 +0000 |
| Subject: | note 70352 deleted from ref.mbstring by bjori | ||
| References: | 1 | Groups: | php.notes |
| Request: | Send a blank email to php-notes+get-118464@lists.php.net to get a copy of this message | ||
Note Submitter: pashev dot igor at pomorsu dot ru
Reason: useless
----
Here is a PERL script to switch to mb_ functions:
#!/usr/bin/perl -w
use integer;
use strict;
foreach my $s (@ARGV)
{
rename($s, "$s.bak") || die "Can't rename $s: $?";
open(IN, "<$s.bak") || die "Can't read $s.bak: $?";
open(OUT, ">$s") || die "Can't write $s: $?";
while(<IN>)
{
s/(\W)mail *(?=\()/$1mb_send_mail/g;
s/(\W)(strlen|strstr|strpos|substr|substr_count) *(?=\()/$1mb_$2/g;
s/(\W)(strtolower|strtoupper) *(?=\()/$1mb_$2/g;
s/(\W)(ereg|eregi|ereg_replace|eregi_replace) *(?=\()/$1mb_$2/g;
s/(\W)(split) *(?=\()/$1mb_$2/g;
print;
print OUT;
}
close(OUT);
close(IN);
}