-> perl -de0

main::(-e:1):   0
  DB<1> $DB::doccmd='perldoc'

  DB<2> perldoc -f grep