From 151b606189542704f787cfd550651fbb5bbb628e Mon Sep 17 00:00:00 2001 From: Florian Pritz Date: Sun, 6 Dec 2015 10:40:21 +0100 Subject: Add scripts Signed-off-by: Florian Pritz --- sort-images | 11 +++++++++++ 1 file changed, 11 insertions(+) create mode 100755 sort-images (limited to 'sort-images') diff --git a/sort-images b/sort-images new file mode 100755 index 0000000..8f64811 --- /dev/null +++ b/sort-images @@ -0,0 +1,11 @@ +#!/bin/sh + +perl-rename -v 'BEGIN{use Image::ExifTool qw(ImageInfo); use Date::Parse; use Date::Format;}; $data = ImageInfo($_); $date = time2str("%Y-%m-%d", str2time($data->{FileModifyDate})); $_ = "$date/$_";' "$@" + +# the same in slow +#for i in "$@"; do + #[[ -d "$i" ]] && continue + #dir=$(exiftool "$i" | grep "File Modification Date/Time" | sed -rn "s/.*: ([0-9]{4}):([0-9]{2}):([0-9]{2}) .*/\1-\2-\3/p") + #mkdir -p "$dir" + #mv -nv "$i" "$dir/$(basename "$i")" +#done -- cgit v1.2.3-24-g4f1b