[comp.lang.perl] But mine doesn't fail?

merlyn@iwarp.intel.com (Randal Schwartz) (03/20/90)

In article <1990Mar19.235021.19961@tc.fluke.COM>, inc@tc (Gary Benson) writes:
| The question was raised about using perl-d inside emacs.
| 
| I thought I had a way, but I don't. I regularly run perl scripts on emacs
| buffers, and it works really slick. I set a mark, advance to the area in
| question, and fast-filter-region {the script}. This works for the stuff I
| normally do, but when I set the -d, whoo-boy! I got knocked into the 0-zone.
| 
| It also fails if I set up a shell internal to emacs. I was hoping the debug
| messages would go to the shell window, but alas no. STDOUT it is, and I am
| not sufficiently emacs conversant to change that. I suppose one ramification
| is that any perl script that is talking to STDOUT will fail inside emacs.

I use perl -d all the time inside GNU Emacs (18.55), so I suspect the
problem is OS-specific.  How about elaborating on your configurations
under which it fails?

Mine works under Sunos4.0.3 on sun3's and sun4's with Perl 3.0
patchlevel 15.  For example, here's the transcript of a "Perlshell"
started with -de 0:

| *** Input ***
| perl -de 0
| *** Output ***
| 
| Loading DB from perldb.pl 3.0.1.2 90/03/12
| 
| main(1):	0
|   DB<1> p `tty`
| /dev/ttyp5
| 
|   DB<2>  @x=stat("/dev/ttyp5"); print "@x";
| 2560 2120 8630 1 0 0 5125 0 636424069 636424076 636424076 8192 0
|   DB<3>  @y=stat(STDOUT); print "@y";
| 2560 2120 8630 1 0 0 5125 0 636424069 637895457 637895457 8192 0
|   DB<4> p $];
| $Header: perly.c,v 3.0.1.4 90/02/28 18:06:41 lwall Locked $
| Patch level: 15
| 
|   DB<5> q
| 
| 
| *** Mon Mar 19 17:11:16 1990: finished ***

$_=',Pr0e=kRcza0hb 5lOr+e"PE :rBe}hRtho]nhaj nt.s[u=J@';s/../unshift(a,$&)/eg;chop(@a);print@a;
-- 
/=Randal L. Schwartz, Stonehenge Consulting Services (503)777-0095 ==========\
| on contract to Intel's iWarp project, Beaverton, Oregon, USA, Sol III      |
| merlyn@iwarp.intel.com ...!any-MX-mailer-like-uunet!iwarp.intel.com!merlyn |
\=Cute Quote: "Welcome to Portland, Oregon, home of the California Raisins!"=/

inc@tc.fluke.COM (Gary Benson) (03/21/90)

In article <1990Mar20.012137.4194@iwarp.intel.com> merlyn@iwarp.intel.com (Randal Schwartz) writes:

>In article <1990Mar19.235021.19961@tc.fluke.COM>, inc@tc (Gary Benson) writes:
|| The question was raised about using perl-d inside emacs.
|| 
|| I thought I had a way, but I don't. I regularly run perl scripts on emacs
|| buffers, and it works really slick. I set a mark, advance to the area in
|| question, and fast-filter-region {the script}. This works for the stuff I
|| normally do, but when I set the -d, whoo-boy! I got knocked into the 0-zone.
|| 
|| It also fails if I set up a shell internal to emacs. I was hoping the debug
|| messages would go to the shell window, but alas no. STDOUT it is, and I am
|| not sufficiently emacs conversant to change that. I suppose one ramification
|| is that any perl script that is talking to STDOUT will fail inside emacs.

! I use perl -d all the time inside GNU Emacs (18.55), so I suspect the
! problem is OS-specific.  How about elaborating on your configurations
! under which it fails?
! 
! Mine works under Sunos4.0.3 on sun3's and sun4's with Perl 3.0
! patchlevel 15.  For example, here's the transcript of a "Perlshell"
! started with -de 0:

Me again. Our configuration is a VAX 11-750 running mt. Xinu More/BSD 4.3
and Unipress Emacs <mumble,,,numbers>.

-- 
Gary Benson    -=[ S M I L E R ]=-   -_-_-_-inc@fluke.tc.com_-_-_-_-_-_-_-_-_-

Many a bum show has been saved by the flag.    -George M. Cohan