СОДЕРЖАНИЕ

Как создать свой сайт Создать сайт
Основы Интернет : FTP HTTP хостинг Вводный курс
Создание сайтов : создать сайт Создание сайтов
Статьи о хостинге : платный бесплатный выделенный сервер Unix Все о хостинге
Учебник HTML Учебник HTML
Учебник CSS Учебник CSS
Учебник CGI : cgi-программирование : методы GET и POST Учебник CGI
Учебник php Учебник PHP
Учебник perl Учебник Perl
Раскрутка сайта : оптимизация кода ключевые слова индекс цитирования регистрация в поисковиках Раскрутка сайта
Заработок на сайте Заработок на сайте
Платёжные системы : rupay webmoney Платежи в сети
книги литература по html css xml flash java Dreamweaver Нужные книги

 

заработок для вебмастера
Заработок для начинающего вебмастера!

 


создать сайт // учебник perl // угловой оператор perl

Угловой оператор

Угловой оператор (<>) иногда из-за своей формы называется "бубновым", прежде всего, использкется для чтения и записи файлов (подробнее об этом речь пойдёт в разделе "Работа с файдами"). Однако чтобы сделать примеры программ более интересными, мы начнём его использовать раньше.

А пока мы будем использовать простейшую форму углового оператора: <STDIN>. Эта конструкция сообщает Perl, что строка должна быть считана со стандартного устройства ввода - обычно с клавиатуры. Таким образом, оператор <STDIN> возвращает строку, введённую с клавиатуры, например:

print "Какой у вас размер обуви?";
$size = <STDIN>;
print "Ваш размер обуви - ${size}Спасибо за внимание";

После выполнения этого кода (предположим, что в качестве размера обуви вы указали число 45) на экран будет выведено следующее:

Какой у вас размер обуви? 45
Ваш размер обуви - 45
Спасибо за внимание

Оператор <STDIN> читает вводимые с клавиатуры символы до тех пор, пока пользователь не нажмёт клавишу <Enter>. Затем введённая строка помещается в переменную $size. Строка текста, возвращенная оператором <STDIN>, содержит символ перевода строки, введённый пользователем при нажатии клавиши <Enter>. Обычно не желательно, чтобы в конце введённой строки находился символ перевода строки, т.е. требуемая строка должна содержать лишь текст. Для удаления символа перевода строки можно воспользоваться оператором chomp:

print "Какой у вас размер обуви?";
$size = <STDIN>;
chomp $size;
print "Ваш размер обуви - $size. Спасибо за внимание\n";

Оператор chomp удаляет в строке-аргументе завершающий символ перевода строки. Он также возвращает количество удалённых символов - обычно это 1, но иногда 0, если ничего не удалено.

 



 

 

 

 

как создать свой сайт