use warnings; use strict; use feature 'say'; use Config::Std; use File::Basename; read_config dirname($0) . '/script_config.ini' => my %cfg; say $cfg{'' }{'key-1' }; say $cfg{'Section A'}{'key-1' }; say $cfg{'Section A'}{'equal-sign'}; say $cfg{'Section B'}{'foo' };