#
#
#
#
#
#
[hello]
#
#
#
#
i=abc
i=def
i=ghi
i=jkl
i=mno
#
j=<<EOT
abc
def
ghi
jkl
mno
pqrs
tuv
wxyz
EOT
#
#
#

##</code><code>##

#! /usr/bin/perl
use warnings;
use strict;
use Getopt::Long;
use Config::IniFiles;

# SAMPLE : SET CONFIGURATION SAMPLE FILE TO READ.
my ($sample,%ini,$cfg,%input_config_citi);
GetOptions('config=s'=>\$sample,-nomultiline => 0);

# TIE : OBTAIN THE CONFIG FILES CONTETNS

$cfg= Config::IniFiles->new(-file=>$sample);

my @arr=$cfg->val('hello','i');

my @arr=$cfg->val('hello','j');
print "\n\nThe values are : ";
print "$_\n",for(@arr);