Help for this page

Select Code to Download


  1. or download this
    sub DB::new_eval { local $DB::onetimeDump = 'dump'; &DB::old_eval(@_);
+ }
*DB::old_eval = \&DB::eval;
*DB::eval = \&DB::new_eval;
  2. or download this
    [tearought-lm|(none)]04:54 PM $ perl -de0

...
   9  10

  DB<2>
  3. or download this
      DB<4> print "my father plays dominos\n"
my father plays dominos
0  1

  DB<5>