Perl en Ini-files

Soms zie je best leuke constructies om configuratiebestand in te lezen, maar Perl bestaat al zolang dat er voldoende modules zijn. Zo ook een module om het bekende ini-file formaat in te lezen. En met de volgende regels in je code heb je al toegang tot de content van een ini-file.

use Config::IniFiles;
use Env qw(HOME);
$cfg = new Config::IniFiles(-file => "$ENV{HOME}/.inirc");
$config{'identity'}{'dbtype'} = $cfg->val('Identity', 'DBType');
$config{'identity'}{'dbnode'} = $cfg->val('Identity', 'DBNode');
$config{'dict'}{'dbtype'} = $cfg->val('Dict', 'DBType');

En natuurlijk ook een voorbeeld van de ini-file.

[Dict]
DBType=variable1
DBNode=variable2
[Identity]
DBType=variable3
DBNode=variable4

Gezien het gemak waarmee dit gedaan kan worden blijft de vraag over waarom je nog eigen procedures zou schrijven.