Displaying 1 result from an estimated 1 matches for "junk0".
Did you mean:
junk
2006 Jan 27
3
paging agi
...needed info for idle sip phones
@sips = grep(/^\s+\d+\s.*/, `asterisk -rx "show hints"`);
# Now check each sip phone to see if it's in use and also
# against our exclude list. If it passes both, it's
# added to our array of calls to make
foreach $sipline (@sips) {
my ($junk0, $exten, $junk1, $chan, $state, $junk2) = split(/ +/,
$sipline,6);
unless (($state ne "State:Idle") || (grep(/$exten/i, @bypass))) {
push (@mypage, "$exten");
}
}
$page= join ("&SIP/", @mypage);
print "$page";{
# Open co...