| /AOO41X/main/solenv/bin/modules/installer/windows/ |
| H A D | idtglobal.pm | 408 my $oneline; 412 … $oneline = "File\tComponent_\tFileName\tFileSize\tVersion\tLanguage\tAttributes\tSequence\n"; 413 push(@{$idtref}, $oneline); 414 $oneline = "s72\ts72\tl255\ti4\tS72\tS20\tI2\ti2\n"; 415 push(@{$idtref}, $oneline); 416 $oneline = "File\tFile\n"; 417 push(@{$idtref}, $oneline); 422 $oneline = "File_\tOptions\tHashPart1\tHashPart2\tHashPart3\tHashPart4\n"; 423 push(@{$idtref}, $oneline); 424 $oneline = "s72\ti2\ti4\ti4\ti4\ti4\n"; [all …]
|
| H A D | assembly.pm | 210 my $oneline = $msiassembly{'Component_'} . "\t" . $msiassembly{'Feature_'} . "\t" . 214 push(@msiassemblytable, $oneline); 264 my $oneline = ""; 270 $oneline = $component . "\t" . "name" . "\t" . $onefile->{'Assemblyname'} . "\n"; 271 push(@msiassemblynametable, $oneline); 276 … $oneline = $component . "\t" . "publicKeyToken" . "\t" . $onefile->{'PublicKeyToken'} . "\n"; 277 push(@msiassemblynametable, $oneline); 282 $oneline = $component . "\t" . "version" . "\t" . $onefile->{'Version'} . "\n"; 283 push(@msiassemblynametable, $oneline); 288 $oneline = $component . "\t" . "culture" . "\t" . $onefile->{'Culture'} . "\n"; [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); 127 … $oneline = $signature . "\t" . $rootvalue . "\t" . $key . "\t" . $name . "\t" . $type . "\n"; 128 push(@{$reglocatfile}, $oneline); [all …]
|
| H A D | msiglobal.pm | 54 my $oneline; 56 $oneline = ".Set CabinetName1=" . $cabinetfile . "\n"; 57 push(@{$ddffileref} ,$oneline); 58 $oneline = ".Set ReservePerCabinetSize=128\n"; # This reserves space for a digital signature. 59 push(@{$ddffileref} ,$oneline); 60 … $oneline = ".Set MaxDiskSize=2147483648\n"; # This allows the .cab file to get a size of 2 GB. 61 push(@{$ddffileref} ,$oneline); 62 $oneline = ".Set CompressionType=LZX\n"; 63 push(@{$ddffileref} ,$oneline); 64 $oneline = ".Set Compress=ON\n"; [all …]
|
| H A D | sign.pm | 731 my $oneline = ${$ddffile}[$i]; 733 $linelength = length($oneline); 924 my $oneline; 933 $oneline = ".Set CabinetName1=" . $cabinetfile . "\n"; 934 push(@{$ddffileref} ,$oneline); 935 $oneline = ".Set ReservePerCabinetSize=128\n"; # This reserves space for a digital signature. 936 push(@{$ddffileref} ,$oneline); 937 … $oneline = ".Set MaxDiskSize=2147483648\n"; # This allows the .cab file to get a size of 2 GB. 938 push(@{$ddffileref} ,$oneline); 939 $oneline = ".Set CompressionType=LZX\n"; [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 | 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 | 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 | 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 | 605 my $oneline = sprintf( 611 push @{$directorytableref}, $oneline; 623 my $oneline = "";
|
| /AOO41X/main/solenv/bin/modules/pre2par/ ! |
| H A D | work.pm | 46 my $oneline = $1; 48 pre2par::remover::remove_leading_and_ending_whitespaces(\$oneline); 49 $oneline = $oneline . "\n"; 50 push(@{$parfile}, $oneline); 80 my $oneline = ${$prefile}[$i]; 81 if ( $oneline =~ /\;\s*\w+/ ) 83 split_line($oneline, \@newprefile); 87 push(@newprefile, $oneline); 113 my $oneline = ${$prefile}[$i]; 117 if ( $oneline =~ /^\s*\}\;\s*$/ ) [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;
|
| /AOO41X/main/solenv/bin/modules/installer/ ! |
| H A D | javainstaller.pm | 197 my $oneline = ${$templatefile}[$i]; 202 if ( $oneline =~ /\b(OOO_gid_\w+)\b/ ) 240 my $oneline = ${$templatefile}[$i]; 242 while ( $oneline =~ /\b(OOO_\w+)\b/ ) 246 $oneline =~ s/$replacestring//; 311 my $oneline = ${$licensefile}[$i]; 313 if ($i == 0) { $oneline =~ s/^\s*\�\�\�//; } 315 $oneline =~ s/\s*$//; 316 $oneline =~ s/\"/\\\"/g; # masquerading the " 317 $oneline =~ s/\'/\\\'/g; # masquerading the ' [all …]
|
| H A D | packagepool.pm | 95 my $oneline = ${$newcontent}[$i]; 96 …$oneline =~ s/\s*$//; # Removing line ends. Also not included in old epm file, that is read from p… 97 push(@newlocalcontent, $oneline); 287 my $oneline = "PackageName: $realpackagename\n"; 288 push(@content, $oneline); 290 $oneline = "md5sum: $md5sum\n"; 291 push(@content, $oneline); 293 $oneline = "FileSize: $filesize\n"; 294 push(@content, $oneline); 296 $oneline = "FullPackageName: $fullpackagename\n"; [all …]
|
| H A D | profiles.pm | 66 my $oneline = ${$profilesref}[$j]; 67 installer::remover::remove_leading_and_ending_whitespaces(\$oneline); 69 if ( $oneline eq $section )
|
| H A D | download.pm | 721 my $oneline = ${$versionfile}[$i]; 723 if ( $oneline =~ /^\s*\#/ ) { next; } # comment line 724 if ( $oneline =~ /^\s*\"\s*(.*?)\s*\"\s*$/ ) 1137 my $oneline = " " . "SetOutPath" . " " . "\"\$INSTDIR" . $relativedir . "\"" . "\n"; 1140 $oneline =~ s/\//\\/g; 1142 push(@filelist, $oneline); 1317 my $oneline = ${$mlffile}[$i]; 1319 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
|
| /AOO41X/main/solenv/bin/ ! |
| H A D | leconvert.pl | 50 foreach my $oneline ( @lines ) { 51 $oneline =~ s/\r*\n*$/$lineend/;
|