A simple Perl script I to adjust the date of files on an SDXC SD card that contains Fujifilm X-E1 JPG and RAF files