added script

added perl script for ediInventoryProcess