diff --git a/libs/esl/perl/ESL/IVR.pm b/libs/esl/perl/ESL/IVR.pm
index e36b8c9029..f7919c1b94 100644
--- a/libs/esl/perl/ESL/IVR.pm
+++ b/libs/esl/perl/ESL/IVR.pm
@@ -43,14 +43,12 @@ sub getVar($;) {
   my $input;
 
   if ($e) {
-    $input = $e->getBody() . "\n";
-    if ($input eq "_undef_") {
+    $input = $e->getBody();
+    if ($input && $input eq "_undef_") {
       $input = undef;
     }
   }
   
-  chomp $input;
-  
   return $input;  
 
 }