0

私は自分の機器からこの出力を読み取ろうとしています.printとwaitforをどのように使用する必要がありますか.私は成功していません.

これが出力です....

zSH> get v52-interface-group 1
v52-interface-group  1
name-id: --------------------->  {CTAA-024}
local-interface-id: ---------->  {1024}
local-prov-variant: ---------->  {2}
prov-variant-request: -------->  {norequest}
admin-status: ---------------->  {inservice}
pstn-layer-3-start-address: -->  {1}
isdn-env-func-start-address: ->  {1}
port-alignment-request: ------>  {norequest}
national-pstn-region: -------->  {brazil}
switch-vendor: --------------->  {nortel}
protocol-spec: --------------->  {edition2}
startup-check-link-id: ------->  {false}
startup-unblock-user-ports: -->  {false}
link-oos-timer: -------------->  {2500}
link-is-timer: --------------->  {200}

v52-link has 16 elements. Display [a]ll, [n]one, a [s]ubset, or [q]uit? q

これは、私が読もうとしている私のコードの一部です....

$string = "Display [a]ll, [n]one, a [s]ubset, or [q]uit?";
$tel->print("get v52-interface-group 1");
$tel->waitfor(String => $string);
@out = $tel->cmd('q');
print @out;
4

1 に答える 1

0

正規表現waitfor()を使用する場合は、角かっこを保護するようにしてください。

$string = "/Display\s+\[a\]ll,\s+\[n\]one,\s+a\s+\[s\]ubset,\s+or\s+\[q\]uit\?/";
$tel->waitfor($string);
于 2013-03-21T15:16:41.820 に答える