Select Code to Download

The following variables are altered by C<DB::eval()> during its execut
+ion. They
are "stacked" via C<local()>, enabling recursive calls to C<DB::eval()
+>. 
...
        $single = $osingle;
        $^D     = $od;
    }

    {
        local( $trace, $single, $^D );
...
        @res = eval "$usercontext $evalarg;\n";  # '\n' for nice recur
+sive debug
    }

    # 'my' would make it visible from user code
    #    but so does local! --tchrist