Карта сайта

Это автоматически сохраненная страница от 12.11.2013. Оригинал был здесь: http://2ch.hk/b/res/57317025.html
Сайт a2ch.ru не связан с авторами и содержимым страницы
жалоба / abuse: admin@a2ch.ru

Втр 12 Ноя 2013 22:58:35
двач, смотри что я сделал:

sub rpn {
my @a;
for (@_) {
if (/-?\d+(\.\d+)?/) {
push @a, $_;
} elsif (/\+ \* \/ -/) {
if (@a >= 2) {
my ($r, $l) = (pop (@a), pop (@a));
my $n = eval "$l $_ $r";
$@ ? die "error\n" : push @a, $n;
} else {
die "error\n";
}
}
}
pop @a;
}


Втр 12 Ноя 2013 23:09:34
>>57317025
Перл для говноедов. Пиздец синтаксис.

Втр 12 Ноя 2013 23:11:06
>>57317468
перл - язык богов с охринительным синтаксисом и сахарком.

Втр 12 Ноя 2013 23:18:06

Втр 12 Ноя 2013 23:32:40

Втр 12 Ноя 2013 23:34:49
>>57318549
что не так?

Втр 12 Ноя 2013 23:36:10
>>57317025
Добра тебе, перлоняша. :3

Втр 12 Ноя 2013 23:37:12
>>57317025
Вычислитель обратной польской нотации? :3

Втр 12 Ноя 2013 23:38:30
>>57318767
как ты догадался?

Втр 12 Ноя 2013 23:39:57
>>57317025
И что оно делает?
мимо-знаю-только-паскаль-кун

Втр 12 Ноя 2013 23:41:03
>>57318899
цифры в стек кладет

Втр 12 Ноя 2013 23:42:52
>>57318836
В /b/ не только дегенераты сидят, няша. :3

Втр 12 Ноя 2013 23:44:33
>>57318950
Ничего не понял

Втр 12 Ноя 2013 23:45:21
>>57319132
я тоже

Втр 12 Ноя 2013 23:46:52
>>57318950
>цифры в стек кладет
push 0x12345678 - в одну команду уложился.

Втр 12 Ноя 2013 23:48:35
>>57317025
Сырняша, у меня от тебя РЕГЕКСПЫ. Что оно делает я пойму, наверное, только часа через 2 сидения с мануалами.

Втр 12 Ноя 2013 23:51:25
>>57319337
неужели перл настолько трудный для чтения?

Втр 12 Ноя 2013 23:51:42
>>57319039
Но и еще и перло-дебилы.
Уебываете в свою пр/парашу.

Втр 12 Ноя 2013 23:52:39
>>57318950
>>57319132
>>57319177
>>57318899
>>57319254
Этот код берёт строку, которая характеризует арифметическое выражение, записанное в обратной польской нотации, ищет в ней цифры и кладёт их в вершину стека, затем берёт операнд (плюс, минус, деление и умножение) и если в стеке есть два числа, то достаёт их оттуда и выполняет код: "число1 операция число2", а результат кладет в стек.
Например, если строка была "543+/", то сперва в стек кладутся числа 5 и 4, затем выполняется 5+4 и 9 кладется в стек, затем в стек кладется 3 и выполняется операция 9/3 и результат падает в стек. Если операндов больше нет, то на верхушке стека будет результат: тройка.

Втр 12 Ноя 2013 23:54:06
>>57319536
нет не так
>>57319499
в /пр тоже не любят перл

Втр 12 Ноя 2013 23:55:43
>>57319609
Тогда ты тупой уёбок и не правильно реализовал алгоритм вычисления выражения в обратной польской нотации. Или это не обратная польская нотация вовсе.

Втр 12 Ноя 2013 23:59:32
двач, смотри что я сделал:

perl -e '$??s:;s:s;;$?::s;;=]=>%-{<- }<& {;;y; -/:-@[-{-};`-{/" -;;s;;$_;see'


Срд 13 Ноя 2013 00:01:04
>>57319685
> Или это не обратная польская нотация вовсе.
а как ты узнал?

Срд 13 Ноя 2013 00:02:19
>>57319844
В жопку себе древний как говно мамонта патч брамина засунь, дебил.

Срд 13 Ноя 2013 00:03:45
>>57319929
>sub rpn
>rpn
>reverse polish notation
Умри.

Срд 13 Ноя 2013 00:04:18
>>57319995
Затралел тебя, азаза

Срд 13 Ноя 2013 00:05:32
немного обфускации не помешает.

print sub{for(@_){
if(/-?\d+(\.\d+)?/){
push @a, $_;}elsif
(/\+ \* \/ -/){if(@a
>=2){($r, $l)=(pop(@a),
pop(@a));$n=eval"$l$_$r"
;$@ ?exit:push @a, $n;}else
{exit}}}pop @a}->(split
/\s+/, "5 4 6 + /");

>>57319995
а что ты такой злой?
>>57320055
она могла назваться и merge_sort например. и что?

Срд 13 Ноя 2013 00:08:37
>>57320141
Выведет троечку же. :3

Срд 13 Ноя 2013 00:09:45
>>57320260
какую троечку, анон?

Срд 13 Ноя 2013 00:10:45
>>57320332
он умер же.

Срд 13 Ноя 2013 00:11:44
А я недавно начал учить перл. Ведь это же язык великих бородатых UNIX-администраторов.

Срд 13 Ноя 2013 00:16:43

Срд 13 Ноя 2013 00:17:42
>>57320664
кто выведет?

Срд 13 Ноя 2013 00:20:54
>>57320719
Код.

Срд 13 Ноя 2013 00:22:08
>>57317025
вишмастер скиньте, там регэкспы лучше работают

Срд 13 Ноя 2013 00:22:17
>>57320850
Какой код?

Срд 13 Ноя 2013 00:22:24
>>57320850
5 / (4 + 6)

Срд 13 Ноя 2013 00:23:56
>>57320858
не торопись ты так. на днях 4.2 обещают выпустить. в новой версии капчу обойти можно будет, так что абу с пссс-кодами сосет.

Срд 13 Ноя 2013 00:24:50
>>57320978
ура, я этого джва года ждал


← К списку тредов