Программа проверяет наличие новой почты. Проверяется кол-во сообщений. Если стало больше – у вас новое сообщение. Код писался с оглядкой на “читателя”, поэтому, возможно, комментируются и очевидные места. Программа получает на вход параметры SERVER USER PASSWORD TIME. Последнее – время, через которое повторяются проверки. Программа работает по принципу “пока не остановишь”. Читать дальше…

Шуточная на половину статья, в которой упоминаются некоторые перловые хаки.
Perl самый опасный язык программирования, поскольку он развивает “отвратительные” качества в людях. Некоторые их называют “добродетелями” программистов: лень, нетерпение, высокомерие (laziness, impatience, hubris). Читать дальше…

open F, 'text.txt' or die;
@t = <F>;
close F;
print scalar @t;

Открыли файл “text.txt” на чтение, создали дескриптор для него (F). Если не смогли – умерли Открой или умри! Вот так то… На самом деле это очень удобно: когда скрипт умирает, он оставляет кучу информации, с помощью которой его можно отладить, да и в целях безопасности лучше умереть, нежели исполняться чёрт знает как… Читать дальше…

Пару слов о типах.

Как и в любом языке (кроме, пожалуй, кодов процессора), в перл данные не просто свалены в кучу, а для удобного использования разбиты на типы. Люди, уже программировавшие на языках C\C++ или Pascal\Delphi сразу вспомнят про int(integer), char, string и будут не правы. Читать дальше…

Скачать интерпретатор perl можно здесь. Для windows это будет exeшник, для Linux\Unix – архив.

Если вы используете Linux\Unix, то скорее всего perl у вас уже установлен. Проверить это проще простого: зайдите в консоль и наберите в ней “perl”(+перевод строки, естественно). Если он уже установлен, то консоль будет ожидать дальнейший ввод – код вашего перл-скрипта. Для выхода из этого режима нажмите Ctrl+C – прерывание, либо нажмите Ctrl+D – указание perlу конца кода, он его выполнит(а чего бы и не выполнить пустой запрос ) и вы вернётесь в консоль. Читать дальше…

Спасибо сайту http://www.perl4all.ru/ за подборку всех функций Perl Читать дальше…

$w[$n++]=[(/./g)x99]while;print$^O=~/Win/?`cls\n`
:`clear\n`,map{$l=$w[$_];$r=sqrt$_*(20-$_);shift@$l;my
@o;@o[$x=$r-$r*cos$_*.1,2*$r-$x]=@{$l}[$_,32-$_]for
1..16;$"x(15-$r),@o,$/}0..20 until select$f,$f,$f,.2
__DATA__
    ###### ####   ### ####  ##              ##
  ###  ###### ##   ######          ###################
 ##   #########    ####           #  ###  ##############
      ###########               # ## ####################
     #########                  #####  ################### #
      ##### #                  ####  ####################
       ## #                     ##########################
        #   #                ###############   ####  ####  #
         #   #              ##############     ###   ### # #
          ###                ############       #     ## #
         #####                  ########            # ##
         #######                #######             ##### ##
          #######               ###### #          ###########
          ######                 #### #           ##########
          #####                   ###                   ###   #
          ####                    ####                      ##
          ##
          #

################################################################

Читать дальше…

(Перевод brian’s_guide.pod)

Следуйте этому руководству и берегите нервы.
Моя философия отладки

Я верю в три вещи:
1. Ничего личного

Забудьте об авторстве кода. Вы можете считать себя художником, но даже великие художники делали много ерунды. У всех код ерундовый, то есть мой код — ерунда, и ваш тоже. Смиритесь с этим. Если есть проблема, то первой мыслью должно быть «с моим ерундовым кодом что-то не так». Так вы не будете считать виновным Perl. Ничего личного.

Забудьте о том, как вы что-то делаете. Если бы ваш подход работал, вы бы это не читали. В этом нет ничего плохого, просто нужно развиваться. Все мы там будем. Читать дальше…