Little perl script to walkt the Photostream dir and copy out any files