Lines Matching refs:filecontent
221 my ($filecontent) = @_;
225 for ( my $i = 0; $i <= $#{$filecontent}; $i++ )
229 if ( ${$filecontent}[$i] =~ /^\s*(.*?)\t(.*?)\t(.*?)\s*$/ )
254 my ($filecontent) = @_;
258 for ( my $i = 0; $i <= $#{$filecontent}; $i++ )
262 if ( ${$filecontent}[$i] =~ /^\s*(.*?)\t(.*?)\t(.*?)\t(.*?)\t(.*?)\t(.*?)\s*$/ )
280 my ($filecontent) = @_;
284 for ( my $i = 0; $i <= $#{$filecontent}; $i++ )
288 if ( ${$filecontent}[$i] =~ /^\s*(.*?)\t(.*?)\t(.*?)\t(.*?)\t(.*?)\t(.*?)\s*$/ )
307 my ($filecontent) = @_;
311 for ( my $i = 0; $i <= $#{$filecontent}; $i++ )
315 if ( ${$filecontent}[$i] =~ /^\s*(.*?)\t(.*?)\t(.*?)\t(.*?)\t(.*?)\t(.*?)\s*$/ )
345 my ($filecontent) = @_;
351 for ( my $i = 0; $i <= $#{$filecontent}; $i++ )
355 if ( ${$filecontent}[$i] =~ /^\s*(.*?)\t(.*?)\t(.*?)\t(.*?)\t(.*?)\t(.*?)\t(.*?)\t(.*?)\s*$/ )
869 my $filecontent = installer::files::read_file($filename);
870 my $dirhash = analyze_directory_file($filecontent);
877 $filecontent = installer::files::read_file($filename);
878 my ( $filehash, $fileorder, $maxsequence ) = analyze_file_file($filecontent);