+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. | ||
|