Re: Pipe print output into shell in debugger

On Jul 28, 1:27 am, rich.j...@xxxxxxxxx (Richard Lee) wrote:


I am sure there are other ways to do this but I always wonder how to get
this done.
Many research and I found that I could have |  (pipe) precede your
command and output will go to your pager.
I am just not sure how to change the pager on my system(mine is less,
and if you can change to vi, you should be able to save it).

Let me know if you are able to change your pager...... (I am not sure if
pager they mean editor or something else in your environment, I use bash ).

Thank you Richard for your reply!

Your suggestion does not work :-( Probably I did not understand you? I
am working with tcsh on Macintosh and a little example of my attempts
to apply your suggestion are looking as follows:


marekste% perl -d excel_autorech.pl

Loading DB routines from perl5db.pl version 1.3
Editor support available.

Enter h or `h h' for help, or `man perldebug' for more help.

main::(excel_autorech.pl:38): my ( $start_day, $start_month, $year )
=
main::(excel_autorech.pl:39): ( 14, 7, 2008 ); #without leading
"0" please!
DB<1> s
main::(excel_autorech.pl:40): my @last_numbers = ( "56993,0",
"77265,2", "3464", "2638", "84,1" );
DB<1> c 287
main::(excel_autorech.pl:287): print OUT "\n" x ( 29 - $last_row );
DB<2> |
syntax error at (eval 42)[/usr/local/lib/perl5/5.10.0/perl5db.pl:638]
line 2, near ";
|"

DB<2> | print OUT "\n" x ( 29 - $last_row );
DB<3> print OUT "\n" x ( 29 - $last_row ); |
syntax error at (eval 44)[/usr/local/lib/perl5/5.10.0/perl5db.pl:638]
line 2, near "; |"

DB<4> print OUT "\n" x ( 29 - $last_row ); | more
syntax error at (eval 49)[/usr/local/lib/perl5/5.10.0/perl5db.pl:638]
line 2, near "; |"

Did I understand something wrong?


best greetings from Munich


marek

.