| CC: | "Bill Ricker" <bill.n1vux [...] gmail.com> |
| Subject: | With ellipsis, :if readable validation applied to item after |
| Date: | Tue, 18 Nov 2008 16:10:00 -0500 |
| To: | <bug-Getopt-Declare [...] rt.cpan.org> |
| From: | "Ricker, William" <William.Ricker [...] FMR.COM> |
Perl -
ActiveState 810, 5.8.4
ActiveState 1002, 5.10.0.
v5.8.0 built for i386-linux-thread-multi (Redhat 3)
v5.8.5 built for x86_64-linux-thread-multi (Redhat 4)
Module -
Getopt-Declare-1.11
==========
-in <infile:if> Input file expected to be .csv
[required]
-cfg <cfg:if>... Config file(s) in INI format
default Settings.cfg
Modes.cfg
{ @::ConfigFiles = @cfg; warn "Configs
@{[join q{, },@::ConfigFiles]}\n";}
-debug
===========
$ perl godecl.pl -in costs.csv -cfg a.cfg b.cfg c.cfg d.cfg
Is ok
$ perl godecl1.pl -in costs.csv -cfg a.cfg b.cfg c.cfg d.cfg -debug
Fails unless the :if is removed, with message
========
Error: in parameter '-cfg' (file "-debug" is not readable)
(try 'godecl1.pl -help' for more information)
==========
Adding a trailing literal "," to the cfg parameter defn changes the
error to
file "," is not readable
I will send minimal test case ZIP direct to Damian - will RT handle
attachments ? - which will reproduce on MSwin or Linux, and likely OS X
too. E.g.,
$ (export PERL5LIB=Getopt-Declare-1.11/lib; export PATH="$PATH:." ; sh
-x < godecl.cmd )
(I could use BITCARD from home but ...)
Workaround is to put the <only:if>... last on commandline , which only
works if only one <:if> is multi ...
-- BILL IN BOSTON