photo-stats

Unnamed repository; edit this file 'description' to name the repository.
git clone git://code.clttr.info/photo-stats.git
Log | Files | Refs | README | LICENSE

commit cd7f7e95511224a22225c5c7273d672800a0357e
parent bf93f019255c6ec38549d4ad61af062c05422ce6
Author: René Wagner <rwagner@rw-net.de>
Date:   Wed, 29 Jul 2020 21:33:22 +0200

use -fast for exiftool

Diffstat:
Mphosta.pl | 2+-
1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/phosta.pl b/phosta.pl @@ -49,7 +49,7 @@ sub get_stats say "Scanning $destination_dir for files..."; - my $cmd = "exiftool -r -m -f -p '\$filepath##\$make##\$model##\$lens##\$lensmodel##\$focallength##\$focallengthin35mmformat##\$aperture##\$exposuretime##\$iso##\$flash##\$datetimeoriginal' -d \"%Y-%m-%d %H:%M:%S\" -ext jpg " . $destination_dir; + my $cmd = "exiftool -fast2 -r -m -f -p '\$filepath##\$make##\$model##\$lens##\$lensmodel##\$focallength##\$focallengthin35mmformat##\$aperture##\$exposuretime##\$iso##\$flash##\$datetimeoriginal' -d \"%Y-%m-%d %H:%M:%S\" -ext jpg " . $destination_dir; my @lines = qx($cmd); my $dbh = DBI->connect($dsn, $userid, $password, { RaiseError => 1 })