[6754] in Perl-Users-Digest
Perl-Users Digest, Issue: 379 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sun Apr 27 00:07:20 1997
Date: Sat, 26 Apr 97 21:00:21 -0700
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Sat, 26 Apr 1997 Volume: 8 Number: 379
Today's topics:
Re: [Q] Converting a string to lower case (Lloyd Zusman)
Re: Can I kill a pipe? <rootbeer@teleport.com>
Re: Good editor for W95? <clarkgr@erinet.com>
Re: HELP! Matching a multi line pattern and replacing i (David Alan Black)
Re: Implemenation of "Virtual Classes" (Steven W McDougall)
Is fh->input_record_separator broken? <vladimir@cs.ualberta.ca>
Re: Is fh->input_record_separator broken? <tchrist@mox.perl.com>
Re: Is there a YACC module? <vladimir@cs.ualberta.ca>
Re: Need a round(EXPR, INT) subroutine <vladimir@cs.ualberta.ca>
Re: need help with a simple (i hope) question. <rootbeer@teleport.com>
Re: Newbie Help - Format an Integer with Comma's <billc@tibinc.com>
Re: Newbie Help - Format an Integer with Comma's <sanford@halcyon.com>
Newbie needs help with arrays <akalsey@mci2000.com>
Re: Newbie needs help with arrays (Tad McClellan)
Re: newbie question: no data found? <rootbeer@teleport.com>
Re: Object IDs are bad (was: Ousterhout and Tcl lost th (ozan s. yigit)
Re: Odd array sizing information <vladimir@cs.ualberta.ca>
Re: Odd array sizing information (Ilya Zakharevich)
Re: please help - cgi database access script / program <rootbeer@teleport.com>
quote of the day? (John Thomas Mosey)
Re: quote of the day? (Nathan V. Patwardhan)
Re: raw input (Tad McClellan)
Removing 2 or more spaces ? (C Carr)
Re: Trouble with Emacs auto formatter (Ilya Zakharevich)
Re: Trouble with Emacs auto formatter <vladimir@cs.ualberta.ca>
Re: Trouble with Emacs auto formatter (Ilya Zakharevich)
Re: Trouble with Emacs auto formatter (Ilya Zakharevich)
Re: undump revisited? (Abigail)
Re: undump revisited? <rootbeer@teleport.com>
Re: undump revisited? (Dave Meyer)
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 26 Apr 1997 22:32:43 GMT
From: ljz@asfast.com (Lloyd Zusman)
Subject: Re: [Q] Converting a string to lower case
Message-Id: <slrn5m50kk.8kn.ljz@sunspot.tiac.net>
I am correcting my own typo (see below):
On 26 Apr 1997 01:39:51 GMT, Lloyd Zusman <ljz@asfast.com> wrote:
>
> On Tue, 15 Apr 1997 04:41:09 -0600, amas@lhr-sys.dhl.com <amas@lhr-sys.dhl.com> wrote:
> >
> > Coming from AWK I feel a bit lost without certain of my favourite
> > function calls. One of these is the toLower() and toUpper() calls.
> > I am still new to this regexp stuff, so could someone show me how
> > to do this. A bit more detail might help: specifically I would like
> > to take a string that contains any sort of character and only change
> > the case of the alpabetic characters and leave the rest alone.
> >
> > Thanks for any help
>
> Try this (works in newer versions of Perl):
>
> $string2 = lc($string1); # converts to lower case
> $string2 = lc($string1); # converts to upper case
!!! should be uc($string1);
>
> This is an older construct that works in all Perl versions:
>
> $string2 = "\L$string1\E"; # converts to lower case
> $string2 = "\U$string1\E"; # converts to upper case
--
Lloyd Zusman 01234567 <-- The world famous Indent-o-Meter.
ljz@asfast.com ^ Indent or be indented.
------------------------------
Date: Sat, 26 Apr 1997 17:13:55 -0700
From: Tom Phoenix <rootbeer@teleport.com>
To: malgosia askanas <ma@panix.com>
Subject: Re: Can I kill a pipe?
Message-Id: <Pine.GSO.3.96.970426171054.5782D-100000@kelly.teleport.com>
On 25 Apr 1997, malgosia askanas wrote:
> If my Perl program opens a pipe to "sendmail", is there any way to kill
> this pipe without send out the mail, if in the course of processing
> it turns out that the mail shouldn't be sent out after all?
That depends, doesn't it, upon what the program at the other end of the
pipe does when you kill it. If you can stop it before it sends the mail
(and without damaging its systems) you might be able to do what you're
asking.
But I wouldn't recommend it; I'm sure that sendmail expects that you're
going to have it send the mail that you're asking it to send. But if you
really need to find out what it will do, ask the sendmail experts in their
discussion group, since it's not really a Perl question. Good luck!
-- Tom Phoenix http://www.teleport.com/~rootbeer/
rootbeer@teleport.com PGP Skribu al mi per Esperanto!
Randal Schwartz Case: http://www.lightlink.com/fors/
------------------------------
Date: Sat, 26 Apr 1997 19:33:56 -0000
From: George Rogers Clark <clarkgr@erinet.com>
Subject: Re: Good editor for W95?
Message-Id: <VA.00000013.0e6a5592@csa-main>
I believe the original poster was referring to another problem than
"work-a-like" features.
Your Unix boxes and Win95 (or DOS) boxes use different end-of-line
markers. You need an editor which works on Win95, but allows you to
save the file to a Unix file format for transport to your Unix boxes.
My TOP choice for this situation is UltraEdit32. It is shareware and
is a great programmers editor. My second choice is Freeware, but lacks
a few features of UltraEdit32 --- PFEdit (Programmer's File Editor) is
available for download from some shareware sites, free.
Good luck.
-----------------------
clarkgr@erinet.com
George Rogers Clark
American Hero
-----------------------
Using Virtual Access
http://www.vamail.com
------------------------------
Date: 27 Apr 1997 00:18:29 GMT
From: dblack@icarus.shu.edu (David Alan Black)
Subject: Re: HELP! Matching a multi line pattern and replacing it
Message-Id: <5ju60l$pnc@pirate.shu.edu>
Hello -
junkmail@sysa.abdn.ac.uk (Kyzer) writes:
>David Millier of i_dont@have.one wrote in comp.lang.perl.misc:
>: I need to match somthing that looks like this:
>: New files in F:\ozzy_data\buckeye
>: Need to remove the "New files in ........." followed by two blank lines.
>
>$list=`cat <list`;
>$list =~ s/^New files.+\n\n//;
That will remove the text line and *one* blank line, *once*.
Something along these lines should work:
$list =~ s/New files.+\n{3}//g;
assuming that the string "New files" doesn't show up in the
middle of a line which is followed by two blank lines but is
not supposed to be deleted (unlikely - but could happen if
a file were named "New files").
David Black
dblack@icarus.shu.edu
------------------------------
Date: Sun, 27 Apr 1997 03:43:01 GMT
From: swmcd@world.std.com (Steven W McDougall)
Subject: Re: Implemenation of "Virtual Classes"
Message-Id: <E9A2Bp.JLu@world.std.com>
Kevin Atkinson <kevina@clark.net> writes:
>In article <E96trM.2pn@world.std.com>,
> swmcd@world.std.com (Steven W McDougall) wrote:
>> What if you did a local() on the package variable?
>Interesting except I wanted for it to have to scope of my,
What is the difference between the scope of my and the scope of local?
(In terms of your problem; I know what the difference in Perl is.)
>also there is
>no actual varable for MIXED, instead it is part of a tag list.
You mean like this?
world:~/bin>cat hello
#!/usr/local/bin/perl5.003
use strict;
my %tags = qw(a 1 b 2 c 3);
sub B { print "B ", $tags{b}, "\n" }
sub foo
{
B();
local $tags{b}=6;
B();
}
foo();
B();
world:~/bin>./hello
B 2
B 6
B 2
world:~/bin>
>I didn't know you could do that with local though
You can do all sorts of things with local :)
- SWM
------------------------------
Date: 26 Apr 1997 15:00:06 -0600
From: Vladimir Alexiev <vladimir@cs.ualberta.ca>
Subject: Is fh->input_record_separator broken?
Message-Id: <omohb1v6sp.fsf@tees.cs.ualberta.ca>
perlvar says that after "use FileHandle" one can use "OO" file vars, such as
$INPUT_RECORD_SEPARATOR, aka $/, aka $RS. Now, I'd expect that
fh->input_record_separator('') will leave the RS of OTHER files alone, but
no, it is changed! Why is that?
version 5.003 with EMBED + suidperl security patch
Please reply with CC.
------------------------------
Date: 27 Apr 1997 01:55:17 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: Is fh->input_record_separator broken?
Message-Id: <5jubm5$618$1@csnews.cs.colorado.edu>
[courtesy cc of this posting sent to cited author via email]
In comp.lang.perl.misc,
Vladimir Alexiev <vladimir@cs.ualberta.ca> writes:
:perlvar says that after "use FileHandle" one can use "OO" file vars, such as
:$INPUT_RECORD_SEPARATOR, aka $/, aka $RS. Now, I'd expect that
:fh->input_record_separator('') will leave the RS of OTHER files alone, but
:no, it is changed! Why is that?
Because that's the way it works. Patches accepted.
--tom
--
Tom Christiansen tchrist@jhereg.perl.com
MAGIC* xmg_magic; /* linked list of magicalness */
--Larry Wall, from sv.h in the v5.0 perl distribution
------------------------------
Date: 26 Apr 1997 17:42:37 -0600
From: Vladimir Alexiev <vladimir@cs.ualberta.ca>
Subject: Re: Is there a YACC module?
Message-Id: <omsp0dmjv6.fsf@tees.cs.ualberta.ca>
In article <wu9g1we7i83.fsf@organic.com> Jake Donham <jake@organic.com> writes:
> CPAN/authors/id/JAKE/perl5-byacc-patches-0.5.tar.gz
And which BTW doesn't need -P as far as I can see.
------------------------------
Date: 26 Apr 1997 17:34:26 -0600
From: Vladimir Alexiev <vladimir@cs.ualberta.ca>
To: fdesjarl@chat.carleton.ca (Frederic Desjarlais)
Subject: Re: Need a round(EXPR, INT) subroutine
Message-Id: <omvi59mk8t.fsf@tees.cs.ualberta.ca>
In article <Pine.GSO.3.96.970425083144.26685H-100000@kelly.teleport.com> Tom Phoenix <rootbeer@teleport.com> writes:
> > the number of decimal places to round it to.
> I'd probably use sprintf
I thought I'd use the * format option to specify the width and the precision,
but no cigar:
$ perl -de 0
DB<1> print sprintf "%*.*f",5,2,12.34567
Use of * in printf format not supported at (eval 4) line 2, <IN> chunk 1.
Luckily, variable interpolation comes to the rescue
DB<2> $wid=5; $prec=2; print sprintf "%$wid.${prec}f",12.34567
12.35
------------------------------
Date: Sat, 26 Apr 1997 17:05:58 -0700
From: Tom Phoenix <rootbeer@teleport.com>
To: David Alan Black <dblack@icarus.shu.edu>
Subject: Re: need help with a simple (i hope) question.
Message-Id: <Pine.GSO.3.96.970426170028.5782B-100000@kelly.teleport.com>
On 25 Apr 1997, David Alan Black wrote:
> >---->line 296 (undef, $subject, undef, $message_file) =
> > split(/::/);
>
> Well, as the error message suggests, you can't assign to undef.
> You can assign undef to variables, but not the other way around.
Actually, that turns out to not be the case. In recent versions of Perl,
undef is usable for exactly this purpose: discarding unwanted list
elements. These two bits of code...
(undef, $subject, undef, $message_file) = split /::/;
($subject, $message_file) = (split /::/)[1,3];
...should produce identical results. (Although I believe that the first
may be optimized a little better.)
If you can't get it to work, maybe your version of Perl is old? Hope this
helps!
-- Tom Phoenix http://www.teleport.com/~rootbeer/
rootbeer@teleport.com PGP Skribu al mi per Esperanto!
Randal Schwartz Case: http://www.lightlink.com/fors/
------------------------------
Date: Sat, 26 Apr 1997 17:35:00 -0400
From: Bill Cowan <billc@tibinc.com>
To: deepak@pcsltd.com
Subject: Re: Newbie Help - Format an Integer with Comma's
Message-Id: <33627504.31A9@tibinc.com>
Deepak Thadani wrote:
>
> Hello,
> I'm sorry to ask such a question, but I can't really
> figure this out. Is there some kind of format command in perl
> which places commas in between numbers for me? Say I had a
> variable $VALUE with a value of 1024000. Is there a function
> or something I could use to get $VALSTR to be "1,024,000" ?
> Something more ledgible, something with commas. How?
>
> Thanks again all.
>
> Deepak <deepak@pcsltd.com>
Try printf and sprintf functions described in perlfunc man page.
Perl FAQ also has a discussion on adding commas at:
http://www.perl.com/faq/
-- Bill
-----------------------------------------------------------------------
Bill Cowan <billc@tibinc.com> Voice:919-490-0034 Fax:919-490-0143
Tiburon, Inc./3333 Durham-Chapel Hill Blvd Suite E-100/Durham, NC 27707
------------------------------
Date: 26 Apr 1997 17:57:36 -0700
From: Sanford Morton <sanford@halcyon.com>
Subject: Re: Newbie Help - Format an Integer with Comma's
Message-Id: <m37mhpz3i7.fsf@darkstar.frop.org>
### insert commas into the integer
### see Camel I (Programming Perl, 1st edition, p. 237)
1 while $num =~ s/(.*\d)(\d\d\d)/$1,$2/;
--------
Sanford Morton, Ph.D. CGI Resources
sanford@halcyon.com http://www.halcyon.com/sanford/cgi/
------------------------------
Date: 26 Apr 1997 22:20:54 GMT
From: "Adam Kalsey" <akalsey@mci2000.com>
Subject: Newbie needs help with arrays
Message-Id: <01bc528f$f1258460$0aba29a6@sac0c152.sac.mci.com>
Can anyone tell me if I can store an associative array in a cell of another
associative array? In other words, is it possible to build a
multidimensional array?
Please email me if you can help.
Adam Kalsey
akalsey@mci2000.com
------------------------------
Date: Sat, 26 Apr 1997 18:27:04 -0500
From: tadmc@flash.net (Tad McClellan)
Subject: Re: Newbie needs help with arrays
Message-Id: <803uj5.bp6.ln@localhost>
Adam Kalsey (akalsey@mci2000.com) wrote:
: Can anyone tell me if I can store an associative array in a cell of another
^^^^^^^^^^^^^^
The Perl man pages that are included with the perl distribution
have a file named: perllol.pod.
The third line of that file gives its title:
perlLoL - Manipulating Lists of Lists in Perl
So, I would say the answer is yes...
: associative array? In other words, is it possible to build a
: multidimensional array?
^^^^^^^^^^^^^^^^
grep multidimensional *.pod
perldsc.pod:-- including multidimensional arrays--is that even though they might
perldsc.pod:multidimensional arrays work as well.
perllol.pod:If you want to get at a slide (part of a row) in a multidimensional
perlref.pod:elements. (The multidimensional syntax described later can be used to
perlref.pod:produce as complicated a structure as you want. The multidimensional
perlref.pod:multidimensional arrays just like C's:
: Please email me if you can help.
^^^^^^^^^^^^^^^
No. Most certainly not for a question answered by the documentation
that you must already have (you have perl installed, yes?)
You are expected to make some small effort yourself before posting.
We are not here to read the documentation for you.
The documentation was created to forestall questions such as
this. Doesn't always work though...
--
Tad McClellan SGML Consulting
Tag And Document Consulting Perl programming
tadmc@flash.net
------------------------------
Date: Sat, 26 Apr 1997 17:38:49 -0700
From: Tom Phoenix <rootbeer@teleport.com>
To: John Thomas Mosey <mosey@alpha2.csd.uwm.edu>
Subject: Re: newbie question: no data found?
Message-Id: <Pine.GSO.3.96.970426173827.5782H-100000@kelly.teleport.com>
On 25 Apr 1997, John Thomas Mosey wrote:
> I am just picking cgi/Perl up. I wrote a little test script and eve nthis
> doesn't work.
When you're having trouble with a CGI form in Perl, you should first look
at the please-don't-be-offended-by-the-name Idiot's Guide to solving such
problems. It's available on the perl.com web pages. Hope this helps!
http://www.perl.com/perl/
http://www.perl.com/perl/faq/
http://www.perl.com/perl/faq/idiots-guide.html
-- Tom Phoenix http://www.teleport.com/~rootbeer/
rootbeer@teleport.com PGP Skribu al mi per Esperanto!
Randal Schwartz Case: http://www.lightlink.com/fors/
------------------------------
Date: 26 Apr 1997 20:17:00 -0400
From: oz@ds9.rnd.border.com (ozan s. yigit)
Subject: Re: Object IDs are bad (was: Ousterhout and Tcl lost the plot with latest paper)
Message-Id: <x6wwpp48w3.fsf@ds9.rnd.border.com>
Erik Naggum writes [amongst other things]:
> part of the problem with pointers is that languages such as C and C++ force
> you to remember the difference between a pointer and a pointed-to-value,
> even though the language is supposedly strongly typed and the compiler
> perfectly well knows when you get it wrong. e.g., if you declare struct
> foo *bar;, it should not be a terribly hard task for the compiler to
> understand that bar.zot means the field "zot" of the structure _pointed_to_
> by bar, but oddly enough, you have to write bar->zot or (*bar).zot to do
> that, which is just idiotic. [...]
bar->zot is a shorthand for a troubling indirection operator that ritchie
regards as an accident of syntax. it also goes to show that consequences
of early mistakes can be indistinguishable from something idiotic to
anyone who sees them in a vacuum.
see "The Development of the C Language" included the "History
of Programming Languages."
send your language fixes to C9X...
oz
------------------------------
Date: 26 Apr 1997 17:24:55 -0600
From: Vladimir Alexiev <vladimir@cs.ualberta.ca>
Subject: Re: Odd array sizing information
Message-Id: <omwwppmkoo.fsf@tees.cs.ualberta.ca>
In article <ofbzpumesmb.fsf@geronimo.uit.no> Tom Grydeland <tom@geronimo.uit.no> writes:
> What's next? Fractally-dimensioned arrays?
I think you're missing quaternions.
But more importantly, I'd like to raise a concern about the lack of infinite
strings in perl. If we had them, our hashes would be equi-cardinal to arrays
indexed by real numbers (and I mean real reals, not mere doubles).
------------------------------
Date: 27 Apr 1997 01:48:25 GMT
From: ilya@math.ohio-state.edu (Ilya Zakharevich)
Subject: Re: Odd array sizing information
Message-Id: <5jub99$878$1@mathserv.mps.ohio-state.edu>
[A complimentary Cc of this posting was sent to Vladimir Alexiev
<vladimir@cs.ualberta.ca>],
who wrote in article <omwwppmkoo.fsf@tees.cs.ualberta.ca>:
> But more importantly, I'd like to raise a concern about the lack of infinite
> strings in perl. If we had them, our hashes would be equi-cardinal to arrays
> indexed by real numbers (and I mean real reals, not mere doubles).
If you would subscribe to p5-p, you would see that I proposed a
support of infinite strings in regexp engine.
Ilya
------------------------------
Date: Sat, 26 Apr 1997 17:08:56 -0700
From: Tom Phoenix <rootbeer@teleport.com>
Subject: Re: please help - cgi database access script / program for web page
Message-Id: <Pine.GSO.3.96.970426170735.5782C-100000@kelly.teleport.com>
On Fri, 25 Apr 1997, Richard G. Coleman wrote:
> I am looking to create a web page that accesses a database (can be in
> Access, Paradox, DBase or any other major pc format - even delimited
> text if it must be) and displays information from it.
> Can anoyne tell me the correct way to proceed.
I'd encourage you to write it in Perl. Start by learning from a book like
the Llama. With that, and a little looking at online examples,
documentation, and sample code, you'll have it done in no time. Have fun
with it!
-- Tom Phoenix http://www.teleport.com/~rootbeer/
rootbeer@teleport.com PGP Skribu al mi per Esperanto!
Randal Schwartz Case: http://www.lightlink.com/fors/
------------------------------
Date: 27 Apr 1997 01:09:46 GMT
From: mosey@alpha2.csd.uwm.edu (John Thomas Mosey)
Subject: quote of the day?
Message-Id: <5ju90q$q5p@uwm.edu>
I'd like to make a quote of the day script, only I don't know the syntax
to call the day. What code to I use to check what day of the month it is?
John Mosey
--
"Everybody was talking about how there was so much pressure. Pressure is when
the kids are sick or you don't have food on the table. I enjoy my job."
-- Alex Fernandez
------------------------------
Date: 27 Apr 1997 02:39:06 GMT
From: nvp@shore.net (Nathan V. Patwardhan)
Subject: Re: quote of the day?
Message-Id: <5jue8a$403@fridge-nf0.shore.net>
John Thomas Mosey (mosey@alpha2.csd.uwm.edu) wrote:
: I'd like to make a quote of the day script, only I don't know the syntax
: to call the day. What code to I use to check what day of the month it is?
localtime(), or you could get the Date modules.
--
Nathan V. Patwardhan
nvp@shore.net
------------------------------
Date: Sat, 26 Apr 1997 15:06:37 -0500
From: tadmc@flash.net (Tad McClellan)
Subject: Re: raw input
Message-Id: <d8ntj5.6p5.ln@localhost>
Chipmunk (Ronald.J.Kimball@dartmouth.edu) wrote:
: In article <5jpui7$q3b@info.abdn.ac.uk>
: junkmail@sysa.abdn.ac.uk (Kyzer) writes:
: > Sascha Teske, while smelling of fish, wrote:
: > : I have a Problem i want to write an more intelligent chat and want to
: > : use perl is there a way to get data before or without a newline "amen" ?
: > : don't say RTFM to me, I DID !!!
: >
: > Perl keeps newlines because it hsn't been told not to.
: > The easiest way to fix it is:
: >
: > $my_string_with_newline = "Hello wurld\n";
: >
: > chop($my_string_with_newline); # now it's "Hello wurld" no newline
: That's a good way to remove newlines (chomp is better, if you have
: perl5)
: but that's not what Sascha asked about. The problem is how to get data
: without having to wait for a newline.
: I'd offer a suggestion here, but I haven't a clue how to do it. ;-)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
read() or sysread() ?
--
Tad McClellan SGML Consulting
Tag And Document Consulting Perl programming
tadmc@flash.net
------------------------------
Date: Sun, 27 Apr 1997 03:16:46 GMT
From: clint@netcom.com (C Carr)
Subject: Removing 2 or more spaces ?
Message-Id: <clintE9A13y.B4t@netcom.com>
Keywords: space variable delete
Is there a quick way to remove two or more spaces in a variable?
Thanks,
Clinton
------------------------------
Date: 26 Apr 1997 22:53:54 GMT
From: ilya@math.ohio-state.edu (Ilya Zakharevich)
Subject: Re: Trouble with Emacs auto formatter
Message-Id: <5ju122$2ic$1@mathserv.mps.ohio-state.edu>
[A complimentary Cc of this posting was sent to Chipmunk
<Ronald.J.Kimball@dartmouth.edu>],
who wrote in article <5jt85p$b4e$3@dartvax.dartmouth.edu>:
> In article <5jqv3i$frq$1@mathserv.mps.ohio-state.edu>
> ilya@math.ohio-state.edu (Ilya Zakharevich) writes:
>
> > Note that the latest CPerl mode (if used with latest Emacs's, starting
> > from 19.34.94 of Apr 15) will handle **most** Perl constructs
> > correctly. What remains is to add
> >
> > a) s{}() filter (different matching parenths on `s' and `tr');
> > b) $blah'foo filter
> >
> > and 99.999% of Perl code is going to be covered.
>
> Does it handle here documents correctly, or does it try to indent them?
>
> Chipmunk
I think HERE-docs are handled even without a patch to Emacs. I do not
remember exactly, though.
Ilya
------------------------------
Date: 26 Apr 1997 17:47:43 -0600
From: Vladimir Alexiev <vladimir@cs.ualberta.ca>
To: ilya@math.ohio-state.edu (Ilya Zakharevich)
Subject: Re: Trouble with Emacs auto formatter
Message-Id: <omrafxmjmp.fsf@tees.cs.ualberta.ca>
Does it grok s'foo'bar' ?
What features of 19.34.94 that are not found in earlier version does it use?
------------------------------
Date: 27 Apr 1997 01:57:46 GMT
From: ilya@math.ohio-state.edu (Ilya Zakharevich)
Subject: Re: Trouble with Emacs auto formatter
Message-Id: <5jubqq$878$2@mathserv.mps.ohio-state.edu>
[A complimentary Cc of this posting was sent to Vladimir Alexiev
<vladimir@cs.ualberta.ca>],
who wrote in article <omrafxmjmp.fsf@tees.cs.ualberta.ca>:
> Does it grok s'foo'bar' ?
Yes. As of today it handles all the quirks I know. (And has a
(half-working) regexp beautifier.)
> What features of 19.34.94 that are not found in earlier version does it use?
Syntax-type by a text-property.
Ilya
------------------------------
Date: 27 Apr 1997 02:05:16 GMT
From: ilya@math.ohio-state.edu (Ilya Zakharevich)
Subject: Re: Trouble with Emacs auto formatter
Message-Id: <5juc8s$878$3@mathserv.mps.ohio-state.edu>
> As of today it handles all the quirks I know. (And has a
> (half-working) regexp beautifier.)
Btw, here is an example (from mathsci2bibtex): starting with
elsif (/^\s*no\.\s*([-\/\d]+(\s*\([-\/\d]+\))?(\s*exp(\.|\w+)(\s*no\.)?\s*[-\/\d]+)?(\s*[ivxlc]+\.?)?)\s*$/i) {
#as: no. 3-4(75-76) Exp. No. 708
#as: no. 6 i.
I got
elsif (/
^ \s* no \. \s*
(
[-\/\d]+
(
\s* \( [-\/\d]+ \)
)?
(
\s* exp
(
\.
|
\w+
)
(
\s* no \.
)?
\s* [-\/\d]+
)?
(
\s* [ivxlc]+ \.?
)?
)
\s* $
/xi) {
#as: no. 3-4(75-76) Exp. No. 708
#as: no. 6 i.
(it is not _that_ better, but ready-to-be-commented).
Ilya
------------------------------
Date: Sat, 26 Apr 1997 22:56:18 GMT
From: abigail@fnx.com (Abigail)
Subject: Re: undump revisited?
Message-Id: <E99p1u.7yq@nonexistent.com>
On Sat, 26 Apr 1997 08:20:26 -0700, Roger Smith wrote in
comp.lang.perl.misc <URL: news:33621D3A.6FF2@proteus.arc.nasa.gov>:
++
++ I am still left with the issue of how to distribute this code to many
++ unix platforms, and I cant believe that my problem is unique in the
++ perl/unix world. So here is a more detailed statement of the issue for
++ those of you that are interested.
I won't comment on the problem with embedded passwords in the source.
But why aren't you using PGP? Let all the other sides install PGP, let
them send you their public key, encrypt using this key, then send. You
might want to verify the keys fingerprint via other means (fax, phone,
surface mail, business trip).
See the various cryptografy groups & FAQs.
Abigail
------------------------------
Date: Sat, 26 Apr 1997 17:51:28 -0700
From: Tom Phoenix <rootbeer@teleport.com>
To: Roger Smith <rsmith@proteus.arc.nasa.gov>
Subject: Re: undump revisited?
Message-Id: <Pine.GSO.3.96.970426173924.5782I-100000@kelly.teleport.com>
On Fri, 25 Apr 1997, Roger Smith wrote:
> I am looking for a good way to distribute a highly secure set of perl
> modules to over 3000 sites. Obviously, sending source code in the clear
> with embedded passwords, etc., is not the way to do it. There is also no
> gurantee that every remote site will have the perl interpreter
> installed.
If they don't have Perl, what could they want with Perl modules?
When you say that these are a "secure set" of modules, what do you mean?
Do you mean that they are confidential, guaranteed, safe, worry free, or
stable? :-)
If your worry is that the modules not be tampered with in transit,
consider sending MD5 checksums by some secure (in _this_ sense) channel.
If you're trying to keep your source code confidential, use legal means
such as copyrights. It all comes down to that anyway, and it's less
trouble and more polite than hiding your source. But, if you must hide the
source, see the FAQ.
If you're trying to keep the modules from being copied, there's not much
you can do about that besides legal means, as long as you're going to have
3000 copies anyway. But the FAQ has important information about that, too.
If your worry is that the end users will tamper with the modules, well,
they might. Once again, use legal means; they could tamper with a binary
as well. And you won't be surprised to know that the FAQ has something to
say about that.
> I have been surfing the net for advise on undump but about half the
> pages I encounter literally say "maybe" and the other half say that this
> is an old (and apparently abandoned) concept.
Half of them are half right. :-) If you want to deliver anything in a
pre-compiled form, you'll need to pre-compile it for each type of machine
it's going to run upon. (I hope that none of your clients wants to run it
on a Cray! :-)
In any case, using undump is the wrong way for new projects. If you must
compile, check out the Perl compiler modules, on CPAN.
Hope this helps!
-- Tom Phoenix http://www.teleport.com/~rootbeer/
rootbeer@teleport.com PGP Skribu al mi per Esperanto!
Randal Schwartz Case: http://www.lightlink.com/fors/
------------------------------
Date: 26 Apr 1997 23:03:20 -0400
From: dave@spg-as33s67.erols.com (Dave Meyer)
Subject: Re: undump revisited?
Message-Id: <5juflo$e$1@fluffy.vais.net>
According to Roger Smith <rsmith@proteus.arc.nasa.gov>:
> Worse, many
> of the unix boxes here are older unix systems with tiny system disks and
> so little free space that perl would not fit on many installations.
Every platform I've ever tried undump on produces HUGE binaries - a
single undumped binary is usually about the same size as a minimal
perl distribution. Add in the fact that undumped binaries are, in my
experience, very flaky, and I think you'd be foolish to rely on an
undump solution.
If for no other reason than disk space limitations (and I think TC can
probably provide you several other very good reasons), undump won't
work for you.
--
David M. Meyer
meyer@virtc.com
------------------------------
Date: 8 Mar 97 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 8 Mar 97)
Message-Id: <null>
Administrivia:
The Perl-Users Digest is a retransmission of the USENET newsgroup
comp.lang.perl.misc. For subscription or unsubscription requests, send
the single line:
subscribe perl-users
or:
unsubscribe perl-users
to almanac@ruby.oce.orst.edu.
To submit articles to comp.lang.perl.misc (and this Digest), send your
article to perl-users@ruby.oce.orst.edu.
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
To request back copies (available for a week or so), send your request
to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
where x is the volume number and y is the issue number.
The Meta-FAQ, an article containing information about the FAQ, is
available by requesting "send perl-users meta-faq". The real FAQ, as it
appeared last in the newsgroup, can be retrieved with the request "send
perl-users FAQ". Due to their sizes, neither the Meta-FAQ nor the FAQ
are included in the digest.
The "mini-FAQ", which is an updated version of the Meta-FAQ, is
available by requesting "send perl-users mini-faq". It appears twice
weekly in the group, but is not distributed in the digest.
For other requests pertaining to the digest, send mail to
perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
sending perl questions to the -request address, I don't have time to
answer them even if I did know the answer.
------------------------------
End of Perl-Users Digest V8 Issue 379
*************************************
