Select Code to Download

$ perl -d -e 1

...
        perl -MCPAN -e shell
to reach CPAN. Falling back to 'stty'.
        If you do not want to see this warning, set PERL_READLINE_NOWA
+RN

 at /scratch/testfrank/lib/perl5/Term/ReadLine/readline.pm line 1730
        readline::SetTTY() called at /scratch/testfrank/lib/perl5/Term
+/ReadLine/readline.pm line 1580
...
        DB::readline('  DB<1> ') called at /usr/lib/perl5/5.8.8/perl5d
+b.pl line 2203
        DB::DB called at -e line 1
  DB<1>

DB<3> b 1580
DB<4> x readline::readline('  FOO ')
...
DB<<6>> x $@
0  ''
DB<<7>>