Date: 06/18/07 (Code WTF) Keywords: no keywords Вот код, который может довести до истерики (perl). $t = "asdasdasdasdas+"; if ($t = ~/^(.*)\+$/) { print "$1\n"; } Далеко не сразу очевидно, где зарыты грабли. Source: http://community.livejournal.com/code_wtf/89589.html
|