LINUX.ORG.RU

Информация о пользователе perl5_guy

Nick: perl5_guy
ID: 161940

Дата регистрации:
Последнее посещение:
Статус: ★★★★★

Добродушный юродивый пропагандирующий Perl и добро как таковое. Одно из направлений указанной пропаганды - написание новостей на ЛОРе. Надеюсь мои телеги интересны и полезны.

#!/usr/bin/env perl

use English;

format =
.

BEGIN {
  open f,"<$0";
  s(.*)((<f>)[-1])e;

  AUTOLOAD {
      $AUTOLOAD=~/(:)\1/;
      @ARG = ( $', @_);
      !wantarray ? formline(<<pop) : @_;
~^*
@_
pop
  }
  s/\S{0,}/*{"::\${^MATCH}"}=\&{"::$&"}/eg;
}

END {
    write or die;
}

Just Another Perl Hacker

Статистика

Первая созданная тема:
Последняя созданная тема:
Первый комментарий:
Последний комментарий:
Число комментариев: 1371

Раздел Число тем
Новости 32
Форум 17

Сообщения пользователя