+CME ERROR: 100 when executing USSD command in perl

Question

I\'m using this script to check the credit on my SIM card using USSD command it works fine using a an old Nokia phone connected with USB cable to my PC , the issue is the sa