diff --git a/lib/eval.pl b/lib/eval.pl
index e0fcc46..79f19b1 100755
--- a/lib/eval.pl
+++ b/lib/eval.pl
@@ -179,7 +179,7 @@ no warnings;
 
       if( $@ ) { print STDOUT "Error: $@"; return }
 
-      my $dp = B::Deparse->new("-p", "-q", "-x7");
+      my $dp = B::Deparse->new("-p", "-q", "-x7", "-d");
 
       my @out;