use strict;
use warnings;
unshift @ARGV,$_ for reverse
map {s/\s*#.*$|^\s*#.*$//; (split ' ',$_,2)}
split /\n/, <<'EOCONF'
--put here
-your
--list of arguments and
#any
#indented
--comment #comments
--too
EOCONF
;
print "@ARGV" unless caller;
1;
####
perl -MConfigDefault program.pl --verbosity 0
##
##
perl ConfigFind.pm | xargs find