Вот, как и обещал, пишу статью о программировании на этом, бесспорно, прекрасном языке. Алерт! Статья для новичков! Все кто уже потирает руки с желанием нагадить в комментах - валите отсюда сразу. Говорить я буду о перле под виндовс - это чтобы небыло потом дальнейших пререканий и недоразумений. Непосредственно перед тем как мы начнём мучать этот язык, советую скачать - ActivePerl(12.7MB) Интерпретатор Перл.(Именно интерпретатор, а не компилятор, как его ошибочно называют многие) EmEditor (3.1 MB) (Редактор) В нём Вы будете находить свои ошибки (а ошибки есть у всех и всегда) куда быстрее, чем в блокноте. И маленький совет от меня - Когда будете устанавливать ActivePerl - создайте на диске C директорию usr и уже в неё ставьте Perl. ------------- Поскольку за один раз проглотить перл неполучится - буду писать примерно раз в две недели продолжение. Ну вот собственно с вступлением покончено раз и навсегда. Обратного пути у Вас нет . Вперёд! --------------- Начало Ну вот. Начинаем. Перво-наперво напишем малюсенькую программку которая выведет надпись - "antichat - rulezzz4hax0rz". Code: #!/usr/bin/perl -w print ("antichat - rulezzz4hax0rz\n"); Сохраняем это дело в файл с именем например antichat.pl Открываем из cmd и смотрим на результат. Теперь обьясню что мы только что сделали Итак - первая строка говорит о том что это программа написана на перле и указывает путь к интерпретатору. Кроме того, как Вы наверное заметили здесь присутствует ключ -w. Этот ключ применяют для того что чтобы перл-интерпретатор предупреждал нас о заведомо опасных конструкциях программы. Вообщем на мой взгляд ничего существенного, но так лучше следить за качеством кода. Вторая строка - это выполняемая часть нашей с Вами первой программы. Как видите здесь стоит функция print. В нашем случае print имеет только один аргумент - строку текста. "\n" - означает переход на новую строку. ";" - Точка с запятой завершает оператор. Теперь усложняем задачу - пишем прогу которая будет называть Вас по нику. Наша прога сначала спросит ник, запишет его в переменную и выведет на экран. Одно из мест для хранения значений (например текстовых) - скалярная переменная. Для хранения ника я возьму переменную $nick. Получение данных осуществляется при помощи конструкции <STDIN>, которая в нашем случае получит строку, которую мы в свою очередь присвоем переменной $nick. Code: #!usr/bin/perl -w print "What is you nick-name?\n"; #Какой у тебя ник? $nick = <STDIN>; #Теперь нам осталось сказать "Привет" и указать значение переменной $nick print "Hello,$nick!\n"; Упс... Забыл Если Вы всё сделали правильно, то Ваш ник и восклицательный знак отбразились на разных строчках. Сейчас исправим - Дело в том, что например ник "tclover" поступает как "tclover\n". Чтобы избавиться от этого мы воспульзуемся функцией chomp, которая принимает скалярную переменную и удаляет из её строкового значения символ перехода на новую строку - "\n" chomp ($nick); Теперь у нас получилось что-то вроде этого - Code: #!usr/bin/perl -w print "What is you nick-name?\n"; $nick = <STDIN>; chomp ($nick); print "Hello,$nick!\n"; Вот так уже значительно лучше Теперь усложним ещё больше. Мы же любим себя? Любим конечно, глупый вопрос Тогда сделаем так, чтобы для нас любимых привествие было особым.Добавляем операцию сравнения. Code: #!/usr/bin/perl -w print "What is you nick-name?\n"; $nick = <STDIN>; chomp ($nick); if ($nick eq "tclover"){ print "Hello, tclover You - the Best!"; # Типа для нас } else { print "Hello, $nick \n"; # Типа для всех остальных } В операции eq мы сравнили две строки. Если они равны, то результатом будет "истина". Оператор if выбирает, какой блок операторов (это те что между фигурными скобками) выполняется - если выражение даёт в результате "истина", то выполняется первый блок, ну а если "ложь" - то выполняется второй блок. Ну и последнее на сегодня. Рассмотрим ещё один код. У всех кто открыл это (кроме товарища по имени tclover), ЭТО будет просить ввести пароль. Code: #!/usr/bin/perl -w $pass = "antichat"; # Обьявляем пароль - пароль сегодня "antichat" print "What is your name? \n"; $nick = <STDIN>; chomp $nick; if ($nick eq "tclover"){ print "Hello, tclover! You the Best! \n"; } else { print "Hello $nick! \n"; print "What is the password? \n"; $vopros = <STDIN>; chomp ($vopros); while ($vopros ne $pass){ print "Nichrena, try again. What is the password? \n"; $vopros = <STDIN>; chomp ($vopros); } } Поясню. сначала мы задали секретное слово поместив его в переменную $pass. Прога спрашивает вызывая функцию принт у пользователя пароль и сравнивает с тем что у нас есть. Введённые данные сравниваются с тем что мы задали в операции ne. Эта операция возвращает значение "истина", если сравниваемые строки не равны. Заметьте отличие от операции eq. Далее мы задествовали цикл while, который ваполняется до тех пор пока сравнение проходит с результатом "истина". Ну и в заключение первой части: Всё это я писал для тех, кто ничего не знает о языках программирования, но очень хочет. Перл на мой взгляд наиболее лёгкий для изучения язык. Все умники которые начнут кричать о ламероватости этой статьи могут идти по своему выбору либо сюда либо сразу в /dev/null. А те кто только начинают свой путь - удачи Вам в изучении этого языка. Как только найду время начну писать продолжение. Всем удачи!
вынужден несогласиться. почему выбрал именно про перл писать? других языков нет что-ли? =) тема скобок не раскрыта. тема strict не не раскрыта тема метасимволов(типа \n) не раскрыта тема ибли не раскрыта тема сравнения не раскрыта тема оформления кода не раскрыта хотя это почти все юзается в статье
почему перл сакс: 1. ООП прятянуто за уши. Тут без комментариев. Не нужны комментарии. 2. Переменные по умолчанию. Из-за сабжа приходится читать не только нужный отрывок скрипта, но и отрывок перед ним, чтобы понять, благодаря какой ебической силе меняется переменная. 3. Постусловия. Это вобще маразм - поставить условие в конец строки. Из-за такого кретинизма приходится читать код, а не просто поглядывать на управляющие структуры. Особенно усугуюляется это благодаря п.4. 4. Вольности в синтаксисе. Ну вот нахрена? Правильно - как проще, а не как короче. BlackMagic никому не нужен, кроме автора текста.
ко всему уважению к автору, я бы луше купил/скачал учебник. а на форуме про язык програмирования писать глупо, т.к. всё описать всёравно не сможешь(времи оч много займёт)...да и статей тогда будкт не один десяток
1. начну писать продолжение 2. могут идти по своему выбору либо сюда либо сразу в /dev/null. 3. Изучив один язык легко вычуить другое. И 4. Пля. Там написано куда идти таким умным парням как ты - двигай на wasm.ru и там уже можешь поумничать вволю. Вольности в синтаксисе - как хочу так и пишу. Насчёт того что перл противопоказан новичкам - не вижу ни оной причины для этого. Новичкам ничего не противопоказано, даже ассм. Начинай хоть с него. Без разницы.
потом + поставлю значит ) мне кажется перл новичкам противопоказан. Его постепенно тем более сложно изучать.
раскрой тему ебли. А если серьезно написал бы с примерами там как примерно сплойты пишуться объяснил бы что к чему. Интересно многим было бы.
лучше было бы в файл всё загнать и ссылками давать так удобно и практично А так да клёва (особенно для меня тк в перле не шарю) И вообще взялся доведи до канца и не бросай как принято у вас на античате
При всём уважении к автору [Evolution ], я б не стал называть эту статью "для новичков". Новички обычно ни с Perl`а начинают. А тема статьи, имхо, "Что знает её автор о данном языке" или "Чем он пользуется при написании чего-то на данном языке".
Не для навичков , извените меня ну навичок сразу не будет изучать Perl )), сперва ХТМЛ, потом уже идти по цепочка, а так статья не плохая.
Ни че так статья. Правда если хоть чуть-чуть знаешь даже паскаль, то можно не вдаваться в смысл. Trampled_clover, без обид. Не у кого нет идеи расписать по полочкам, что делает какой-нить сплойт на перле, чтобы потом все сами могли разбирать ошибки "от дурака" в сплойтах? Хорошая бы статья была.
все хорошо да, кроме 1-й же строчки кода #!/usr/bin/perl -w Спрашивается причем здесь /usr/bin/perl, если ты кодишь под винду? Тогда и указывай путь к виндовому интерпретатору...
Все отлично, пиши дальше. Только желательно побольше и почаще, раз в 2 недели, так можно на год растянуть
