+1 (nt) - Tukster , 23.03.2011 14:28 MSK
: : Пример на perl'е:
: :
: : $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