All pastes #181963 Raw Edit

Mine

public text v1 · immutable
#181963 ·published 2006-09-25 15:33 UTC
rendered paste body
# Dial the extension
$astman->connect || die $astman->error . "\n";
if ($ansage eq "Ansage1") {
     print STDERR $astman->sendcommand(
           Action => 'Command',
           Command => 'Dial 1$vorwahl$nummer@pno',);
           }