Solved: use Asterisk::AGI; my $AGI = new Asterisk::AGI; my $peerst = $AGI->get_variable("SIPPEER(123|status)"); my $peercc = $AGI->get_variable("SIPPEER(123|curcalls)"); This works fine in 1.4.18. Thanks. -- Kevin DeGraaf