LINUX.ORG.RU

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

Nick: perl5_guy
ID: 161940

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

Огорчают примеры выкладываемых на ЛОР perl5-скриптов. Надеюсь смогу кому-нибудь помочь добры^Wсоветом.

Меня можно найти в конференции perl5 на жабер.ру

#!/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

Статистика

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

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

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