can i know what is this code about
@arr_maptutufile = split(',', $maptutufile);
foreach $maptutufileval (@arr_maptutufile) {
($maptutu,$mapfile) = split(/\:/, $maptutufileval);
$tutu = $Configuration{"$maptutu"}
;
if ($tutupullfromconf == $TRUE) {
$writetofile = $destinationdir . "/" . $Configuration{"$mapfile"}
. substr($todaysdate,0,6) . ".txt";
}
else {
$writetofile = $destinationdir . "/" . $mapfile . substr($todaysdate,0,6) . ".txt";
$tutu = $maptutu;
}
$tutuid = GETTUTUID($tutu);
if ($tutuid != "") {
push (@uploadfilelist,$writetof
ile);
if (not -e $writetofile) {
$msgLine = "Write header to file ...";
print "\n$msgLine";
LOG($msgLine,$logFile);
WRITETOFILE($fileheader,$w
ritetofile
);
}
$msgLine = "Getting list for tutu $tutu ...";
print "\n$msgLine";
LOG($msgLine,$logFile);
@numberlist = GETNUMBER($tutuid);
$msgLine = "Getting company data for tutu $tutu and write to file ...";
print "\n$msgLine";
LOG($msgLine,$logFile);
Start Free Trial
