Матушка Фотиния
Мыслитель
(6122)
3 дня назад
1. Классика:
print "Hello, World!\n";
2. Без лишних слов:
print+("Hello, World!\n");
3. Используем объектность (ну почти):
use IO::Handle;
STDOUT->print("Hello, World!\n");
4. Полный минимализм (Perl-style):
$|=1; $,=$\="\n";print "Hello, World!";
5. Совсем уж извращение через eval:
eval q(print "Hello, World!\n");