Help for this page

Select Code to Download

Select or download this

$base='/home/foo';<BR>
$logdir="$base/logs";<BR>
$admindir="$base/logs";<BR>

Select or download this

while (<CONFIG>) {
    next if (/^#/); 
...
    $value =~ s/[\$,",',;]//g;
    $configvar{$var}=$value;
}