Есть перловый модуль Getopt::Long, есть необходимость назначить некоей переменной значение по умолчанию. Тестовый скрипт: #!/usr/bin/perl -w -- use strict; use warnings 'FATAL' => 'all'; use Getopt::Long qw(:config no_ignore_case pass_through); use Data::Dumper; GetOptions \my %opt, 'o:1000'; print Dumper \%opt; В результате отдается: $VAR1 = {}; вместо желаемого: $VAR1 = { 'o' => '1000' }; В документации к Getopt::Long (Summary of Options Specifications) сказано: : number [ desttype ] Like ":i", but if the value is omitted, the number will be assigned. Вариант с проверкой значения переменной после GetOptions напрашивается сам собой, но возникает вопрос: где я не прав? P.S. [raven@t-rex - 14:36:15 Пнд Фев 13 ~] $ rpm -q perl perl-5.8.8-1.2 [raven@t-rex - 14:36:17 Пнд Фев 13 ~] $ perl -MGetopt::Long -e 'print $Getopt::Long::VERSION . "\n";' 2.35 -- VP992-RIPE =================================================================== uanog mailing list. To Unsubscribe: send mail to majordomo@uanog.kiev.ua with "unsubscribe uanog" in the body of the message