use Config::IniFiles;
$cfg = new Config::IniFiles( -file => uc "test.ini", -nocase => 1);
@FileExten = $cfg -> Parameters(FileExten);
foreach $FileExten (@FileExten)
{
     $FileExt = uc $cfg -> val(FileExten, $FileExten);
     print "$FileExtension is $FileExt\n";
}

##</code><code>##

[FileExten]
FileExten1 = Value1
FileExten2 = Value2
FileExten3 = Value3
FileExten4 = Value4
FileExten5 = Value5
FileExten6 = Value6
FileExten7 = Value7
FileExten8 = Value8
FileExten9 = Value9