:
: $str = "12w3n4e5sd";
:
: if ($str =~ /^[0-9nsewud]+[^nsewud]+$/) {
: print $str;
: } else {
: print ".$str";
: }
Bina, zahodi - poigraem! :) Budu rad tebya videt.
| Кто шарит в регулярных выражениях (regexp)? - Yasik , 20.03.2011 23:55 MSK |
| Re: Кто шарит в регулярных выражениях (regexp)? - Next , 23.03.2011 02:23 MSK | ||
|
: Пример на perl'е: : : $str = "12w3n4e5sd"; : : if ($str =~ /^[0-9nsewud]+[^nsewud]+$/) { : print $str; : } else { : print ".$str"; : } Bina, zahodi - poigraem! :) Budu rad tebya videt. | |
| ||
