|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Eugene Bodin 2:5020/400 26 Jan 2003 13:21:19 To : Vadim Ponomarev Subject : Re: map -------------------------------------------------------------------------------- Hello Vadim, Arseny, "Vadim Ponomarev" <Vadim.Ponomarev@p118.f33.n461.z2.fidonet.org> wrote to Arseny Kapoulkine: > AK> P.S. Вопрос к All: я видел (сейчас привести код не могу, надо покопаться в > AK> архивах) программу на перле, состоящую _только_ из операторов вида > AK> $...=...; При запуске создается файл &2 (эмуляция stderr, видимо), в > AK> который пишется "Just Another Perl Hacker". Как оно работает? Просьба к > AK> perldoc perlvars не отсылать - я там уже был... perldoc perlop и пролистать до "Bitwise String Operators" или до "JAPH" :-) VP> VP> Просмотри архив эхи. Я не так давно именно эту программу постил ;) Если я правильно понял, его интересовала не сама программа, а то, как она работает. =quote from "Winnie-the-Pooh" А Кристофер Робин ответил: "Обычным путём. Понятно, что это значит?" =cut $\='`'|"'"; Переменной $\ присваивается результат операции | с аргументами '`' и "'". Для Pascal-программистов: здесь это то же, что и $\ = chr( ord('`') | ord("'") ); или $\ = 'g'; $\++; Здесь - то же, что $\ = chr( ord( $\ ) + 1 ); perldoc perlop /Auto-increment and Auto-decrement И так далее. В конце программы оператор `$_`; запускает (внешнюю) команду echo "Just another Perl hacker" >&2 , которая по-разному выполняется в разных ОС. Best regards, Eugene --- ifmail v.2.15dev5 * Origin: RadioScan (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/65994d9049c3.html, оценка из 5, голосов 10
|