Answer call with Perl & Asterisk (more at help.cloudvox.com)

cloudvox-inbound-simple-perl.pl

$call->exec("Swift", "Thank you for calling Cloudvox. Enter a 6 digit number.");
$call->exec("Read", 'pin||6|2|10');

$pin = $call->get_variable("pin");

$call->exec("Swift", "You entered ");
if (length($pin) > 0) {
  $call->exec("SayDigits", $pin);
else {
  $call->exec("Playback", "nothing-at-all");
}