perl script to add timestamps to files (JPG, MOV, ...)

todo:

• when using -a and a timestamp is already in the filename: use it instead of modification time
  • prio 1: EXIF
  • prio 2: timestamp in filename
  • prio 3: modification time