Проблема с Perl. Азы.

[Striderr]

Доброго времени суток, уважаемые участники форума.
Опишу ситуацию - имеется файлик с простенькой программкой, написанной на языке Perl. OS Windows XP.
Дело в том, что при попытке ее запуска с помощью perl.exe - на какие-то доли секунды выскакивает черное окошко и тут же пропадает.
Вопрос - как прописать задержку в самой программе? То есть нужен сам код задержки для программы на Perl.
И правильно ли запускать программу с помощью perl.exe? Я что-то слышал про командную строку, но к сожалению ничего конкретного.
Заранее благодарю.

[cepesh]

Ну вы всегда можете сперва запустить cmd.exe, внутри него выполнить ваш скрипт.
А можно так, как написано тут http://forums.devshed.com/perl-programm ... 58206.html попробовать сделать.

[Maslov]

Работать с Perl удобнее из командной строки. Для этого можно, как уже написал cepesh, просто запустить cmd.exe, а можно установить Far Manager.

[Striderr]

Спасибо за советы, буду пробовать.

[Striderr]

Через командную строку нормально идет)
Это получается, что в данном случае мы видим в командной строке работу интерпретатора Perl?

[Striderr]

Ну на прошлый вопрос ответ то очевиден, это я так, мысли вслух)
А вот скажите, можно ли задать кодировку в perl - скрипте? И как это сделать?
Если сохранить в Unicod, то вообще выдает ошибку. В UTF8 очень жестокие символы. В ANSI текст умудряется вывестись как набор русских букв.

[cepesh]

Вопрос не ясен. Как любой текстовый файл вы можете сохранить скрипт в кодировке UTF-8. Если у вас возникают ошибки, то приведите текст программы и текст ошибки, а также строку для запуска.

[Maslov]

cepesh в сообщении #262375 писал(а):

Если у вас возникают ошибки, то приведите текст программы и текст ошибки, а также строку для запуска.

А также точную версию Perl, которой Вы пользуетесь (вывести можно командой 'perl -version').

[Striderr]

Ок.
Сама версия Perl - 5.6.1.631 (а где надо писать perl -version? - посмотрел версию, наведя мышку на экзешник)

Программка элементарная (пример из лабораторной)

#!/usr/bin/perl
$year = 2001; 
$cost = "\$37"; 
$message = "В $year году книга стоила $cost"; 
print $message;

Будучи сохраненной в ANSI - выводит следующее:

C:\perl>primer.pl
┬ 2001 уюфє ъэшур ёЄюшыр $37

Если сохранить файлик в UTF8, то выдает:

C:\perl>primer.pl
╨Т 2001 ╨│╨╛╨┤╤Г ╨║╨╜╨╕╨│╨░ ╤Б╤В╨╛╨╕╨╗╨░ $37

[Maslov]

И где же ошибки? Это ваш message в кодировке ANSI и UTF-8, выведенный на консоль, для которой выставлена кодировка OEM.
Сохраните результат работы программы в файл, набрав в командной строке

perl primer.pl > a.txt

а потом откройте a.txt в notepad - всё будет нормально.
Или сохраните программу в кодировке OEM (cp 866).

[Striderr]

Спасибо большое, но сегодня на паре решение пришло само)
Я вспомнил про команду chcp, задающую кодировку командной строки.
chcp 1251 - и проблема исчезла)