perl making SN web service call