#!/usr/bin/perl -w use strict; use Config::IniFiles; my $conf = Config::IniFiles->new( -file => DATA ); __DATA__ [SECTION] key =value