added the start of a perl script to simplifiy extracting archives
resolved merge