Модераторы: korob2001, ginnie
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Непонятки с опцией perl -s 
:(
    Опции темы
amg
Дата 27.10.2008, 16:16 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1145
Регистрация: 3.8.2006
Где: Новосибирск

Репутация: 38
Всего: 50
Есть скрипт test следующего содержания:
Код
#!/usr/bin/perl -ws
print "$xyz\n";
Результат:
Код
>./test -xyz=abc
abc
>perl ./test -xyz=abc
1
>perl -s ./test -xyz=abc
abc
Т.е. опция -s работает, но во 2-м случае как-то странно. В чем дело? Или это только у меня так?
PM MAIL   Вверх
ginnie
Дата 27.10.2008, 16:50 (ссылка) | (голосов:1) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Комодератор
Сообщений: 1287
Регистрация: 6.1.2008
Где: Москва

Репутация: 38
Всего: 49
amg, у меня работает так-же, причину выяснить не удалось  smile 


--------------------
Написать код, понятный компьютеру, может каждый, но только хорошие программисты пишут код, понятный людям. (Мартин Фаулер. Рефакторинг)
PM MAIL Skype Jabber   Вверх
nitr
Дата 28.10.2008, 00:55 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 2543
Регистрация: 10.2.2006
Где: Россия :)

Репутация: 37
Всего: 84
Код
#!/usr/bin/perl -s
print "$xyz\n";

а -w заменить use warnings?
В доке не нашел этого, но возможно это в новых версиях пошло, т.к. use warnings предпочтительнее стал, хотя не могу проверить.
В доках промелькали баги опции -w
+ некоторые нюансы описываются http://perldoc.perl.org/perllexwarn.html
+ по опции -s добавлено 
Цитата
Also, when using this option on a script with warnings enabled you may get a lot of spurious "used only once" warnings.



ginnie, amg, но у меня сработало иначе в *nix smile
Цитата
[nitr@SamsungQ210 work]$ cat test233851.pl
#!/usr/bin/perl -ws
print "$xyz\n";
[nitr@SamsungQ210 work]$ ./test233851.pl -xyz=abc
abc
[nitr@SamsungQ210 work]$ perl ./test233851.pl -xyz=abc
abc
[nitr@SamsungQ210 work]$ perl -s ./test233851.pl -xyz=abc
abc
[nitr@SamsungQ210 work]$ perl -v

This is perl, v5.10.0 built for i686-linux-thread-multi

Copyright 1987-2007, Larry Wall

Perl may be copied only under the terms of either the Artistic License or the
GNU General Public License, which may be found in the Perl 5 source kit.

Complete documentation for Perl, including FAQ lists, should be found on
this system using "man perl" or "perldoc perl".  If you have access to the
Internet, point your browser at http://www.perl.org/, the Perl Home Page.

[nitr@SamsungQ210 work]$ 

Может это и был некий баг? Который исправлен, или баг от ActiveState (если винда)...

Это сообщение отредактировал(а) nitr - 28.10.2008, 01:11


--------------------
user posted image
user posted image
I love ArchLinux
PM   Вверх
amg
Дата 28.10.2008, 06:56 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1145
Регистрация: 3.8.2006
Где: Новосибирск

Репутация: 38
Всего: 50
Цитата(nitr @  28.10.2008,  00:55 Найти цитируемый пост)
а -w заменить use warnings?
Не помогает :(
Цитата(nitr @  28.10.2008,  00:55 Найти цитируемый пост)
Может это и был некий баг? Который исправлен, или баг от ActiveState (если винда)...
У меня linux и perl 5.8.8. Действительно, похоже на баг...
PM MAIL   Вверх
nitr
Дата 28.10.2008, 20:08 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 2543
Регистрация: 10.2.2006
Где: Россия :)

Репутация: 37
Всего: 84
А такой бубен как -W, как отреагирует? Или замена местами #!/usr/bin/perl -sw. Но это я так smile
У кого < perl 5.10 проверьте баг "от amg".


--------------------
user posted image
user posted image
I love ArchLinux
PM   Вверх
ginnie
Дата 28.10.2008, 20:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Комодератор
Сообщений: 1287
Регистрация: 6.1.2008
Где: Москва

Репутация: 38
Всего: 49
nitr, ни -W, ни -sw никак не влияют (warnings, похоже, вообще никак не влияет).

Это сообщение отредактировал(а) ginnie - 28.10.2008, 20:34


--------------------
Написать код, понятный компьютеру, может каждый, но только хорошие программисты пишут код, понятный людям. (Мартин Фаулер. Рефакторинг)
PM MAIL Skype Jabber   Вверх
nitr
Дата 28.10.2008, 20:45 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 2543
Регистрация: 10.2.2006
Где: Россия :)

Репутация: 37
Всего: 84
ginnie, так это и есть "бубен" ;)
Не нашли "источник" проблемы? Похоже всё же "ядро"...


--------------------
user posted image
user posted image
I love ArchLinux
PM   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Perl"
korob2001
sharq
  • В этом разделе обсуждаются общие вопросы по языку Perl
  • Если ваш вопрос относится к системному программированию, задавайте его здесь
  • Если ваш вопрос относится к CGI программированию, задавайте его здесь
  • Интерпретатор Perl можно скачать здесь ActiveState, O'REILLY, The source for Perl
  • Справочное руководство "Установка perl-модулей", можно скачать здесь

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, korob2001, sharq.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Perl: Общие вопросы | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0443 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.