+CME 错误：在 perl 中执行 USSD 命令时为 100

编程问答 2022-05-30

问题描述

我正在使用此脚本使用 USSD 命令检查我的 SIM 卡上的信用，使用 USB 电缆连接到我的 PC 的旧诺基亚手机工作正常，问题是当我使用它时相同的脚本不起作用设备：

Huawei USB device

,
可能有什么问题？这是我的 Perl 脚本，请注意通信通过 COM7 端口工作正常：

    use strict;
    use Win32::SerialPort 0.11;
    my $ob = Win32::SerialPort->start ("config.cfg") || die;
    $ob->write("AT+CUSD=1,\"*200#\",15");
    sleep 5;
    my $credit = $ob->input;
    my($directory) = $credit =~ /(.*) DA/;
    print "$directory\n";

我的配置文件 config.cfg：

Win32::SerialPort_Configuration_File -- DO NOT EDIT --
\\.\COM7
CFG_1,none
eol,10
clear,-@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@-
RCONST,0
istrip,0
CFG_2,none
XOFFCHAR,0
PARITY_EN,0
WCONST,200
intr,3
U_MSG,1
STOP,1
XONLIM,0
erase,8
XONCHAR,0
BINARY,1
RTOT,0
echonl,0
XOFFLIM,0
icrnl,0
inlcr,0
READBUF,2097152
igncr,0
EOFCHAR,0
WRITEBUF,0
RINT,4294967295
ocrnl,0
bsdel,opost,0
echoke,1
PARITY,none
HNAME,localhost
echoctl,0
CFG_3,none
EVTCHAR,0
icanon,0
isig,0
HADDR,0
E_MSG,1
DATA,8
DVTYPE,none
echo,0
quit,4
s_eof,26
s_kill,21
ERRCHAR,0
onlcr,1
ALIAS,COM7
HSHAKE,rts
DATYPE,raw
echok,1
echoe,1
BAUD,9600
WTOT,10

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）

at-commandgsmperlserial-portussd