<html><head><style type="text/css"><!-- DIV {margin:0px;} --></style></head><body><div style="font-family:Courier New,courier,monaco,monospace,sans-serif;font-size:12pt"><div style="font-family: Courier New,courier,monaco,monospace,sans-serif; font-size: 12pt;">Thanks. It works. I added user environment variable "PERL_RL" with value "o=0" to my computer. Both dbish and CPAN shell look clean now.<br><div style="font-family: arial,helvetica,sans-serif; font-size: 13px;"><font size="2" face="Tahoma"><hr size="1"><b><span style="font-weight: bold;">From:</span></b> Adriano Ferreira <aferreira@shopzilla.com><br><b><span style="font-weight: bold;">To:</span></b> china-pm@pm.org<br><b><span style="font-weight: bold;">Sent:</span></b> Thursday, November 13, 2008 11:38:40 PM<br><b><span style="font-weight: bold;">Subject:</span></b> Re: [PerlChina] perl shell in activeperl<br></font><br>
2008/11/13 tiger peng <<a ymailto="mailto:tigerpeng2001@yahoo.com" href="mailto:tigerpeng2001@yahoo.com">tigerpeng2001@yahoo.com</a>>:<br>> Hello,<br>><br>> I am new to activeperl. Today, I installed DBI::Shell and played with dbish<br>> and ran into problem: the echoed input seems being wrapped by escaping<br>> characters. For example, when I entered "dev" the screen show<br>> "$B"+(B[1md$B"+(B[0m$B"+(B[1me$B"+(B[0m$B"+(B[1mv$B"+(B[0m". Could anyone tell me how to get a clean<br>> screen?<br><br>I think that's because the Perl terminal is trying to use ornaments<br>(you're seen ANSI escapes which are used to change the color and<br>brightness of the text and to control the terminal). But cmd.exe does<br>not provide an ANSI terminal.<br><br>As DBI::Shell uses Term::ReadLine, I think you can disable that by<br>defining an environment variable PERL_RL with the value<br><br>> set PERL_RL= o=0<br><br>as explained here:<br><br><a
href="http://search.cpan.org/perldoc?Term::ReadLine#ENVIRONMENT" target="_blank">http://search.cpan.org/perldoc?Term::ReadLine#ENVIRONMENT</a><br><br>Maybe there is a more reasonable way to do it by adding some lines to<br>the configuration file of DBI::Shell, but that should at least work.<br><br>Regards,<br>Adriano<br><br>> Thanks,<br>><br>> Tiger,<br>><br>> _______________________________________________<br>> China-pm mailing list<br>> <a ymailto="mailto:China-pm@pm.org" href="mailto:China-pm@pm.org">China-pm@pm.org</a><br>> <a href="http://mail.pm.org/mailman/listinfo/china-pm" target="_blank">http://mail.pm.org/mailman/listinfo/china-pm</a><br>><br>_______________________________________________<br>China-pm mailing list<br><a ymailto="mailto:China-pm@pm.org" href="mailto:China-pm@pm.org">China-pm@pm.org</a><br><a href="http://mail.pm.org/mailman/listinfo/china-pm"
target="_blank">http://mail.pm.org/mailman/listinfo/china-pm</a></div></div></div></body></html>