[comp.lang.perl] undump

ling@nosun.west.sun.com (Ling Kan) (06/27/90)

Can a kind soul e-mail me a SUN4 version of the undump program? Thanks in
advance. 

Name: Ling Kan                       Tel: (503) 690-1386
mail: CADRE Technologies Inc.        e-mail: nosun!microcase!ling    
      19545 N.W. Von Neumann Drive   FAX: (503) 690-1320
      Beaverton, OR 97006

tad@prism.gatech.EDU (Tad K. Mannes) (06/27/90)

I've just recently begun using Perl and find it very useful.  I would
however like to know if there is some way to get a hold of the "undump"
program for a Sequent S81 running DYNIX(R) V3.0.17.9?  Or how to write
one...?		Thanks	--Tad
---
Tad K. Mannes
Georgia Institute of Technology, Atlanta Georgia, 30332
uucp: ...!{allegra,amd,hplabs,seismo,ut-ngp}!gatech!prism!tad
ARPA: tad@prism.gatech.edu

logan@rockville.dg.com (James L. Logan) (07/03/90)

In article <1990Jun26.223735.22528@uvaarpa.Virginia.EDU>
microcase!asimov!ling@nosun.west.sun.com writes:  
# 
# Can a kind soul e-mail me a SUN4 version of the undump program? Thanks in
# advance. 
# 

While we're at it, could someone email me a 386/ix or AViiON
version of undump?  Thanks!  

			-Jim
-- 
James Logan                        UUCP: uunet!inpnms!logan
Data General Telecommunications    Inet: logan@rockville.dg.com
2098 Gaither Road                 Phone: (301) 590-3198
Rockville, MD 20850

tchrist@convex.com (Tom Christiansen) (08/08/90)

I was wondering why perl's dump operator didn't just
write out its dataspace something like the way (I imagine) 
sendmail does to make its freeze-config file.  Let's
say it generate something like $0.out; then on startup
you could do 'perl -R /path/script.out' to restart.  
I'll give 10 to 1 odds Larry's thought this out and discounted
it, but I was wondering why.  Because it might not work on 
all possible systems?  Wouldn't that be better than making
people find an undump, and save disk space too?

--tom
--

    Tom Christiansen                       {uunet,uiucdcs,sun}!convex!tchrist 
    Convex Computer Corporation                            tchrist@convex.COM
		 "EMACS belongs in <sys/errno.h>: Editor too big!"

lwall@jpl-devvax.JPL.NASA.GOV (Larry Wall) (08/09/90)

In article <104716@convex.convex.com> tchrist@convex.Com (Tom Christiansen) writes:
: I was wondering why perl's dump operator didn't just
: write out its dataspace something like the way (I imagine) 
: sendmail does to make its freeze-config file.  Let's
: say it generate something like $0.out; then on startup
: you could do 'perl -R /path/script.out' to restart.  
: I'll give 10 to 1 odds Larry's thought this out and discounted
: it, but I was wondering why.  Because it might not work on 
: all possible systems?  Wouldn't that be better than making
: people find an undump, and save disk space too?

The main problem with that approach is that all your compiled scripts
stand a good chance of busting whenever you recompile Perl.  A secondary
problem is that you still have to invoke a separate executable on the file,
though you could perform trickery with #!.

Yes it would save some disk space.  With care we could even set up a way
to make it redump automatically whenever Perl is recompiled--though the
problem of unwritable executables rears its ugly little head.  The alternative
is to keep all your old versions of Perl around.

What would be way cool is if we could find a way to compile into an
architecture independent format without much load-time penalty.  Seems
difficult, though, without extensive changes to the runtime system.

Larry

vixie@decwrl.dec.com (Paul A Vixie) (08/11/90)

[lwall]
>> What would be way cool is if we could find a way to compile into an
>> architecture independent format without much load-time penalty.  Seems
>> difficult, though, without extensive changes to the runtime system.

Have we reached the point yet, with all the "require"'s and "#include"'s
that most real programs need, where the overhead of compilation is a high
enough component of startup time/work that it would make sense to have an
option to "perl" that would tell it to generate a "byte-code" file that
had a new #! line that referred to a byte-code interpreter?  And wow, was
that a long sentence, or what?

	% perl -o bleat bleat.pl
	% head -2 bleat.pl
	#!/usr/bin/perl
	while (@ARGV) {
	% head -2 bleat
	#!/usr/bin/smallperl
	hkjg876&*^khj&(^jhhkjh(*&^^&*(^

I guess I'm still thinking about sendmail-in-perl.
--
Paul Vixie
DEC Western Research Lab	<vixie@wrl.dec.com>
Palo Alto, California		...!decwrl!vixie

merlyn@iwarp.intel.com (Randal Schwartz) (08/11/90)

In article <VIXIE.90Aug10181641@volition.pa.dec.com>, vixie@decwrl (Paul A Vixie) writes:
| 	% perl -o bleat bleat.pl
| 	% head -2 bleat.pl
| 	#!/usr/bin/perl
| 	while (@ARGV) {
| 	% head -2 bleat
| 	#!/usr/bin/smallperl
| 	hkjg876&*^khj&(^jhhkjh(*&^^&*(^

Actually, some of my Perl code looks a lot like that already. :-)

| I guess I'm still thinking about sendmail-in-perl.

If you ever write it, let me know.  I'll be the first to cut over.
Actually, if you want help writing it, let me know, but *after* the
end of August, please -- the book is taking all my spare time.

vec($x,0,8) = 31; print "Ujlk?~qpkwzm?Ozms?w~|tzm3" ^ $x x 25 # no EBCDIC!
-- 
/=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!"=/

jb3o+@andrew.cmu.edu (Jon Allen Boone) (05/29/91)

Ok - any clues here?


I tried:

  * ipb is the script I want to undump
  * systype is a DECstation 3100 running Ultrix 4.2beta - undump was
    hand converted (possibly incorrectly) from the Vax version
    (though, of course, the header files provide aliases so that you
    MIGHT be able to use the VAX version)

Me:     lust>perl -u ipb
Comp:   IOT trap (core dumped)

Me:	undump ipb.exe perl core
Comp:	Data segment size was 499712 now is 212992

Me:	ipb.exe
Comp:	Segmentation fault (core dumped)

Any clues?
----------------------------------|++++++++++++++++++++++++++++++++++++++++
| "He divines remedies against injuries;   | "Words are drugs."           |
|  he knows how to turn serious accidents  |     -Antero Alli             |
|  to his own advantage; whatever does not |                              |
|  kill him makes him stronger."           | "Culture is for bacteria."   |
|                   - Friedrich Nietzsche  |     - Christopher Hyatt      |
-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-