use Config::IniFiles;
my $handle = Config::IniFiles->new(-file=>$filename);
my $setting = $handle->val ('sectionname','yoursetting')
print "I like chicken.\n";