Lines Matching refs:i
87 for ( my $i = 0; $i <= $#{$ddffile}; $i++ )
89 my $oneline = ${$ddffile}[$i];
92 $linenumber = $i + 1;
857 for ( my $i = 0; $i <= $#{$onefile}; $i++ )
859 ${$onefile}[$i] =~ s/\r?\n$/\r\n/;
898 for ( my $i = 0; $i <= $#{$languagesarray}; $i++ )
900 if ( ${$languagesarray}[$i] eq $defaultlanguage ) { next; }
902 put_transforms_into_setupini($setupinifile, ${$languagesarray}[$i], $counter);
928 for ( my $i = 0; $i <= $#{$allscpactions}; $i++ )
930 my $onescpaction = ${$allscpactions}[$i];
964 for ( my $i = 0; $i <= $#copyfile; $i++ )
966 my $filename = $copyfile[$i];
972 if ( $copyfile[$i] eq "loader2.exe" ) { $destfile = "setup.exe"; } # renaming the loader
973 else { $destfile = $copyfile[$i]; }
1081 for ( my $i = 0; $i <= $#{$componentfile}; $i++ )
1083 my $line = ${$componentfile}[$i];
1140 for ( my $i = 3; $i <= $#{$componenttable}; $i++ ) # ignoring the first three lines
1142 my $oneline = ${$componenttable}[$i];
1200 ${$componenttable}[$i] =~ s/COMPONENTGUID/$uuid/;
1258 for ( my $i = 3; $i <= $#{$reglocatfile}; $i++ ) # ignoring the first three lines
1260 my $oneline = ${$reglocatfile}[$i];
1277 ${$reglocatfile}[$i] = $newline;
1305 for ( my $i = 3; $i <= $#{$filecontent}; $i++ ) # ignoring the first three lines
1307 my $oneline = ${$filecontent}[$i];
1311 ${$filecontent}[$i] =~ s/\bVersionNT\b/VersionNT64/g;
1361 for ( my $i = 0; $i <= $#{$allcabfiles}; $i++ )
1363 my $systemcall = $msidb . " -d " . $msifilename . " -a " . ${$allcabfiles}[$i];
1383 unlink(${$allcabfiles}[$i]);
1385 $infoline = "Deleted cab file: ${$allcabfiles}[$i]\n";
1433 for ( my $i = 0; $i <= $#{$localpackjobref}; $i++ )
1435 my $systemcall = ${$localpackjobref}[$i];
1437 my $callscounter = $i + 1;
1729 for ( my $i = 0; $i <= $#{$filesref}; $i++ )
1731 my $onefile = ${$filesref}[$i];
1774 for ( my $i = 0; $i <= $#{$reglocatfile}; $i++ )
1776 if ( ${$reglocatfile}[$i] =~ /\bLAYERNAMETEMPLATE\b/ )
1787 for ( my $i = 0; $i <= $#{$reglocatfile}; $i++ )
1789 ${$reglocatfile}[$i] =~ s/\bLAYERNAMETEMPLATE\b/$layername/;
1819 for ( my $i = 0; $i <= $#{$removeregistryfile}; $i++ )
1821 for ( my $i = 0; $i <= $#{$removeregistryfile}; $i++ )
1823 …${$removeregistryfile}[$i] =~ s/\bREGISTRYROOTCOMPONENT\b/$installer::globals::registryrootcompone…