Changeset 17861 for trunk/ippScripts/scripts
- Timestamp:
- May 29, 2008, 6:28:25 PM (18 years ago)
- File:
-
- 1 edited
-
trunk/ippScripts/scripts/ipp_image_path.pl (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/ippScripts/scripts/ipp_image_path.pl
r17671 r17861 62 62 my $stmt = $dbh->prepare($query); 63 63 $stmt->execute(); 64 my $nfiles = 0; 64 65 while (my $ref = $stmt->fetchrow_hashref()) { 65 66 my $uri = $ref->{uri}; … … 76 77 $path =~ s/^file\:\/\///; 77 78 } 79 $nfiles++; 78 80 print "$path\n"; 81 } 82 if (!$nfiles) { 83 print STDERR "exposure $exp_name not found\n"; 84 exit 2; 79 85 } 80 86 }
Note:
See TracChangeset
for help on using the changeset viewer.
