use Config::Simple;
$cfg = new Config::Simple();
$cfg->read('c:\work\ftp_config_file.txt');
for ($ct=0, $cfg->param("FTP".$ct.".targetIP")!= '', $ct++)
 		{
		 print " FTP$ct value: ".$cfg->param("FTP$ct.targetIP")."\n";
		}

##</code><code>##

    
[FTP1]
    targetIP=1.1.1.1
[FTP2]
    targetIP=10.10.10.10

##</code><code>##

   use Config::Simple;
   $cfg = new Config::Simple();
   $cfg->read('c:\work\ftp_config_file.txt');
   my $ct=1;
   print " FTP$ct value: ".$cfg->param("FTP$ct.targetIP")."\n";
   $ct++;
    print " FTP$ct value: ".$cfg->param("FTP$ct.targetIP")."\n";