RE: Config file parser

The purpose is for a configuration file that references earlier keys. For example:

sub=salami
mayo=yes
tuna=fish
topping=$sub
mustard=no
[download]

In this example, $config{'topping'} is set to "salami", not "$sub". The only advice I have for the script is to move the chomp until after the "next"s as there is no need to chomp lines you are bypassing. Other than that, a very nice little script.

Comment on RE: Config file parser Download Code

Replies are listed 'Best First'.
RE: RE: Config file parser by stephen (Priest) on Apr 17, 2000 at 04:40 UTC
Neat and powerful. One quibble-- if you had a non-word character in there, like so: `foo=hello fruit=apple foo.bar=tunafish color=red baz=$foo.bar` [download] Then it would turn it into `baz=hello.bar` [download] instead of `baz=tunafish` [download] Still, it's a powerful technique, and I like it. It gives config-files a Makelike capability. You could say: `SCRIPT_DIR=/usr/local/scripts MAIN_SCRIPT=$SCRIPT_DIR/main_script.pl` [download] and then get: `MAIN_SCRIPT=/usr/local/bin/scripts/main_script.pl` [download] You could probably answer the above objection by putting bracket support into it, like so (untested): `$value =~ s/\$ ( {\.+?} \| \w+)/$config{$2}/gx;` [download] That way, we could handle my previous example like so: `foo=hello fruit=apple foo.bar=tunafish color=red baz=${foo.bar}` [download]	[reply] [d/l] [select]

Replies are listed 'Best First'.

RE: RE: Config file parser
by stephen (Priest) on Apr 17, 2000 at 04:40 UTC

One quibble-- if you had a non-word character in there, like so:

foo=hello
fruit=apple
foo.bar=tunafish
color=red
baz=$foo.bar
[download]

baz=hello.bar
[download]

baz=tunafish
[download]

Still, it's a powerful technique, and I like it. It gives config-files a Makelike capability. You could say:

SCRIPT_DIR=/usr/local/scripts
MAIN_SCRIPT=$SCRIPT_DIR/main_script.pl
[download]

MAIN_SCRIPT=/usr/local/bin/scripts/main_script.pl
[download]

You could probably answer the above objection by putting bracket support into it, like so (untested):

$value =~ s/\$ ( {\.+?} | \w+)/$config{$2}/gx;
[download]

foo=hello
fruit=apple
foo.bar=tunafish
color=red
baz=${foo.bar}
[download]

[reply]
[d/l]
[select]