Lines Matching refs:infile
172 my( $infile, $ref_8, $ref_16, $ref_32 ) = @_;
208 print( " testing reading from file \"", $infile, "\" ...\n");
211 $status=$image->ReadImage("$infile");
213 print "ReadImage $infile: $status\n";
217 print "ReadImage $infile: $status\n";
225 print "Image: $infile, signatures do not match.\n";
239 if (!($infile =~ /\.bz2$/) && !($infile =~ /\.gz$/) && !($infile =~ /\.Z$/))
243 if( open( FILE, "< $infile"))
254 print "BlobToImage $infile: $status\n";
258 print "ReadImage $infile: $status\n";
263 print "Image: $infile, signatures do not match.\n";
414 my( $infile, $size, $ref_8, $ref_16, $ref_32 ) = @_;
452 $status=$image->ReadImage("$infile");
454 print "ReadImage $infile: $status";
460 print "Image: $infile, signatures do not match.\n";
488 my( $infile, $outfile, $writeoptions, $ref_8, $ref_16, $ref_32 ) = @_;
515 $status=$image->ReadImage("$infile");
518 print "ReadImage $infile: $status\n";
547 print "Image: $infile, signatures do not match.\n";
720 my( $infile, $outfile, $writeoptions) = @_;
725 $status=$image->ReadImage("$infile");
728 print "ReadImage $infile: not ok $test\n";
780 my( $infile, $outfile, $size, $readdepth, $writeoptions, $ref_8, $ref_16,
821 $status=$image->ReadImage("$infile");
823 print "ReadImage $infile: $status\n";
862 print "Image: $infile, signatures do not match.\n";