Как анализировать линию на поднятие трубки?

[Гость]

В частности нужно определить, когда абонент на удалённой стороне линии поднимет трубку, и проиграть для него сообщение.

На данный момент ситуация такова,

что без разницы - поднли трубу или нет, после набора номера (но не дозвона, т.е. сигналы вызова ещё идут) сразу играет месагу. Пользую следующий скрипт:

use Modem::Vgetty;

my $v = new Modem::Vgetty;

$v->device('DIALUP_LINE');

$v->add_handler('BUSY_TONE', 'finish',

sub{ $v->stop; exit 0; });

$v->enable_events;

$v->dial($ARGV[0]);

$v->waitfor('READY');

...........здесь нужен какой-нить анализ поднятия трубки......

$v->play_and_wait($ARGV[1]);

1;

Помогите пожалуйста, кто знает !!! Заранее огромное спасибо