- 1
- 2
- 3
$search =~ s/[\ \%\*\[\]\^\$\']+/\%/g; # '
my $search_str = '%' . $search . '%';
$search_str =~ s/\%+/\%/g;
Опять кто-то сводит личные счёты? Прохоровщина никак не переведётся.
а эскейп знатный