| /trunk/main/solenv/bin/modules/installer/windows/ |
| H A D | idtglobal.pm | 408 my $oneline;
416 $oneline = "File\tFile\n";
464 $oneline = "s38\ts72\n";
484 $oneline = "s72\tS128\n";
524 $oneline = "s72\ts72\n";
552 $oneline = "Name\tData\n";
554 $oneline = "s72\tv0\n";
556 $oneline = "Icon\tName\n";
574 $oneline = "s72\tI2\n";
604 $oneline = "s72\ts72\n";
[all …]
|
| H A D | assembly.pm | 214 push(@msiassemblytable, $oneline);
264 my $oneline = "";
271 push(@msiassemblynametable, $oneline);
277 push(@msiassemblynametable, $oneline);
283 push(@msiassemblynametable, $oneline);
289 push(@msiassemblynametable, $oneline);
295 push(@msiassemblynametable, $oneline);
327 my $oneline = ${$componenttable}[$j];
344 $oneline = join("\t",
351 ${$componenttable}[$j] = $oneline;
[all …]
|
| H A D | patch.pm | 91 my $oneline = ${$patchcodefile}[$i];
93 if ( $oneline =~ /^\s*\#/ ) { next; } # this is a comment line
94 if ( $oneline =~ /^\s*$/ ) { next; }
97 if ( $oneline =~ /^\s*(\S+)\s/ ) { $code = $1; }
118 $oneline = $signature . "\t" . $rootvalue . "\t" . $key . "\t" . $name . "\t" . $type . "\n";
119 push(@{$reglocatfile}, $oneline);
121 $oneline = $property . "\t" . $signature . "\n";
122 push(@{$appsearchfile}, $oneline);
128 push(@{$reglocatfile}, $oneline);
130 $oneline = $property . "\t" . $signature . "\n";
[all …]
|
| H A D | msiglobal.pm | 54 my $oneline;
57 push(@{$ddffileref} ,$oneline);
59 push(@{$ddffileref} ,$oneline);
61 push(@{$ddffileref} ,$oneline);
63 push(@{$ddffileref} ,$oneline);
65 push(@{$ddffileref} ,$oneline);
67 push(@{$ddffileref} ,$oneline);
68 $oneline = ".Set Cabinet=ON\n";
69 push(@{$ddffileref} ,$oneline);
71 push(@{$ddffileref} ,$oneline);
[all …]
|
| H A D | sign.pm | 731 my $oneline = ${$ddffile}[$i];
924 my $oneline;
934 push(@{$ddffileref} ,$oneline);
936 push(@{$ddffileref} ,$oneline);
938 push(@{$ddffileref} ,$oneline);
940 push(@{$ddffileref} ,$oneline);
942 push(@{$ddffileref} ,$oneline);
944 push(@{$ddffileref} ,$oneline);
945 $oneline = ".Set Cabinet=ON\n";
946 push(@{$ddffileref} ,$oneline);
[all …]
|
| H A D | featurecomponent.pm | 82 my $oneline = "$featurecomponent{'Feature'}\t$featurecomponent{'Component'}\n";
86 if (! installer::existence::exists_in_array($oneline, $featurecomponenttableref))
88 push(@{$featurecomponenttableref}, $oneline);
131 my $oneline = sprintf("%s\t%s\n", $feature_name, $component_name);
132 if ( ! installer::existence::exists_in_array($oneline, $featurecomponenttableref))
134 push(@$featurecomponenttableref, $oneline);
161 my $oneline = ${$featurecomponenttable}[$i];
163 if ( $oneline =~ /^\s*(\S+)\s+(\S+)\s*$/ )
|
| H A D | java.pm | 94 my $oneline = $signature . "\t" . $rootvalue . "\t" . $key . "\t" . $name . "\t" . $type . "\n";
95 push(@{$reglocatfile}, $oneline);
97 $oneline = $property . "\t" . $signature . "\n";
98 push(@{$appsearchfile}, $oneline);
|
| H A D | registry.pm | 348 my $oneline = $registry{'Registry'} . "\t" . $registry{'Root'} . "\t" . $registry{'Key'} . "\t"
351 push(@{$registrytable}, $oneline);
500 my $oneline = join("\t",
509 push(@registrytable, $oneline);
|
| H A D | shortcut.pm | 601 …my $oneline = $shortcut{'Shortcut'} . "\t" . $shortcut{'Directory_'} . "\t" . $shortcut{'Name'} . …
606 push(@shortcuttable, $oneline);
655 …my $oneline = $shortcut{'Shortcut'} . "\t" . $shortcut{'Directory_'} . "\t" . $shortcut{'Name'} . …
660 push(@shortcuttable, $oneline);
|
| H A D | icon.pm | 59 my $oneline = $icon{'Name'} . "\t" . $icon{'Data'} . "\n";
61 push(@icontable, $oneline);
|
| H A D | selfreg.pm | 71 my $oneline = $selfreg{'File_'} . "\t" . $selfreg{'Cost'} . "\n";
73 push(@selfregtable, $oneline);
|
| H A D | component.pm | 618 my ($oneline, $infoline);
624 $oneline = sprintf("%s\t%s\t%s\t%s\t%s\t%s\n",
631 push(@componenttable, $oneline);
|
| H A D | font.pm | 60 my $oneline = $font{'File_'} . "\t" . $font{'FontTitle'} . "\n";
62 push(@fonttable, $oneline);
|
| H A D | removefile.pm | 133 …my $oneline = $removefile{'FileKey'} . "\t" . $removefile{'Component_'} . "\t" . $removefile{'File…
136 push(@removefiletable, $oneline);
|
| H A D | inifile.pm | 125 …my $oneline = $inifile{'IniFile'} . "\t" . $inifile{'FileName'} . "\t" . $inifile{'DirProperty'} .…
129 push(@inifiletable, $oneline);
|
| H A D | createfolder.pm | 134 my $oneline = $directory{'Directory_'} . "\t" . $directory{'Component_'} . "\n";
136 push(@createfoldertable, $oneline);
|
| H A D | directory.pm | 581 my $oneline = sprintf(
587 push @{$directorytableref}, $oneline;
599 my $oneline = "";
|
| /trunk/main/solenv/bin/modules/pre2par/ |
| H A D | work.pm | 46 my $oneline = $1;
49 $oneline = $oneline . "\n";
146 $oneline = $2;
171 $oneline =~ s/\s*$//;
178 $oneline =~ s/\s//g;
179 $globalline .= $oneline;
185 $oneline =~ s/\s//g;
186 $globalline .= $oneline;
201 $oneline = $oneline . "\n";
206 while ($oneline =~
[all …]
|
| H A D | language.pm | 142 my $oneline = ${$parfile}[$i];
146 if ( $oneline =~ /\b${$allreplacestrings}[$j]\b/ ) # Not for basic scripts
150 if ( $oneline =~ /^\s*\w+\s*\(([\w-]+)\)\s*\=/ )
159 $oneline =~ s/$oldstring/$newstring/g;
161 ${$parfile}[$i] = $oneline;
|
| /trunk/main/solenv/bin/modules/installer/ |
| H A D | javainstaller.pm | 197 my $oneline = ${$templatefile}[$i];
240 my $oneline = ${$templatefile}[$i];
242 while ( $oneline =~ /\b(OOO_\w+)\b/ )
246 $oneline =~ s/$replacestring//;
311 my $oneline = ${$licensefile}[$i];
315 $oneline =~ s/\s*$//;
353 my $oneline = $licensearray[$i];
355 $oneline =~ s/\"\s*$//;
892 my $oneline = ${$xmlfile}[$i];
1458 my $oneline = ${$xmlfile}[$i];
[all …]
|
| H A D | packagepool.pm | 95 my $oneline = ${$newcontent}[$i];
97 push(@newlocalcontent, $oneline);
288 push(@content, $oneline);
290 $oneline = "md5sum: $md5sum\n";
291 push(@content, $oneline);
293 $oneline = "FileSize: $filesize\n";
294 push(@content, $oneline);
297 push(@content, $oneline);
300 push(@content, $oneline);
305 push(@content, $oneline);
[all …]
|
| H A D | download.pm | 702 my $oneline = ${$versionfile}[$i];
704 if ( $oneline =~ /^\s*\#/ ) { next; } # comment line
705 if ( $oneline =~ /^\s*\"\s*(.*?)\s*\"\s*$/ )
1112 my $oneline = " " . "SetOutPath" . " " . "\"\$INSTDIR" . $relativedir . "\"" . "\n";
1115 $oneline =~ s/\//\\/g;
1117 push(@filelist, $oneline);
1292 my $oneline = ${$mlffile}[$i];
1294 if ( $oneline =~ /^\s*\[(.+)\]\s*$/ )
|
| H A D | worker.pm | 274 my $oneline = $onefile->{'destination'};
275 if ( $onefile->{'zipfilename'} ) { $oneline = $oneline . " (" . $onefile->{'zipfilename'} . ")"; }
276 $oneline = $oneline . "\n";
277 push(@content, $oneline);
1068 …my $oneline = $regroot . "," . $subkey . "," . $valueentryname . "," . $flag . "," . $value . "\n";
1070 push(@registryitems, $oneline);
2328 my $oneline = ${$includefile}[$j];
2330 if ( $oneline =~ /^\s*(\S+)\s*\=\s*(.*?)\s*$/ ) # no white space allowed in key
3088 my $oneline = ${$spellcheckfile}[$j];
3090 if ( $oneline =~ /^\s*(\S+)\s*\=\s*\"(.*?)\"\s*$/ ) # no white space allowed in key
|
| H A D | profiles.pm | 66 my $oneline = ${$profilesref}[$j];
67 installer::remover::remove_leading_and_ending_whitespaces(\$oneline);
69 if ( $oneline eq $section )
|
| /trunk/main/solenv/bin/ |
| H A D | leconvert.pl | 50 foreach my $oneline ( @lines ) {
51 $oneline =~ s/\r*\n*$/$lineend/;
|