nadejnei.net

**Это старая версия документа!**

Perl — высокоуровневый интерпретируемый динамический язык программирования общего назначения, созданный Ларри Уоллом, лингвистом по образованию. Название языка представляет собой аббревиатуру, которая расшифровывается как Practical Extraction and Report Language — «практический язык для извлечения данных и составления отчётов»[1]. Первоначально аббревиатура состояла из пяти символов и в таком виде в точности совпадала с английским словом pearl («жемчужина»). Но затем стало известно, что такой язык существует (см. PEARL (англ.)), и букву «a» убрали. Талисманом языка Perl является верблюд — не слишком красивое, но очень выносливое животное, способное выполнять тяжёлую работу.

Рассмотрим работу PERL на примерах:

для разбора будет использоваться файл cars.txt

привет мир.

#!/usr/bin/perl
print «Привет Мир \n»


вывод файла:

#!/usr/bin/perl
open(CARS,«./cars.txt»)|| die «Файл не найден»;
while (<CARS>)
{
print ;
}
close(CARS);


Работа с полями:

#!/usr/bin/perl
open(CARS, «./cars.txt») || die «Файл не найден!»;
while(<CARS>)
{ ($proizv,$mod,$gw,$prob,$cena) = split(' ');
print «Производитель: \t $proizv \t Стоимость \t $mod\n»;
}
close(CARS);