Diff for iotta/iotta.pl between version 1.3 and 1.4
version 1.3, 2003/03/30 11:33:59 |
version 1.4, 2003/04/05 16:30:11 |
|
|
&GetOptions ("conf=s" => \@confs, "conffile=s" => \@fname); |
&GetOptions ("conf=s" => \@confs, "conffile=s" => \@fname); |
$conf = join ("\n", @confs); |
$conf = join ("\n", @confs); |
|
|
|
push @fname, "iotta.cf" if (!scalar @fname); |
for my $fname (@fname) { |
for my $fname (@fname) { |
$fname = "iotta.cf" unless $fname; |
|
print STDERR "loading configuration file $fname...\n"; |
print STDERR "loading configuration file $fname...\n"; |
|
|
open (CF, $fname); #|| die "couldn't open configuration file $fname\n"; |
open (CF, $fname); #|| die "couldn't open configuration file $fname\n"; |
Platon Group <platon@platon.org> http://platon.org/
|
|