Some command line options are not GNU/POSIX compliant
[geeqie.git] / scripts / decode_sim
index e4a7fdd..a3c0182 100755 (executable)
@@ -1,5 +1,18 @@
 #! /usr/bin/perl
 #
+## @file
+## @brief Display the contents of a .sim file
+##
+## Usage: ./scripts/decode_sim <path to sim file>
+##
+## Displays:  
+## Comment: <geeqie version file was created by>  
+## Original image dimensions:  
+## Exif Date Original:  
+## MD5 sum:  
+## Image of the thumbnail  
+##
+
 
 use strict;
 use warnings;
@@ -27,6 +40,10 @@ while (<$in_fh>)
    {
       printf "Original image dimensions: %dx%d\n", $1, $2;
    }
+   elsif (/^Date=(\[-1\])/)
+   {
+      printf "Exif Date Original: %s\n", $1;
+   }
    elsif (/^Date=(.*)/)
    {
       my $unix_time = substr($1, 1, 10);