[16179] in Perl-Users-Digest
Perl-Users Digest, Issue: 3591 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Jul 10 18:33:48 2000
Date: Mon, 10 Jul 2000 15:33:34 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <963268414-v9-i3591@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Mon, 10 Jul 2000 Volume: 9 Number: 3591
Today's topics:
perl munching my memory <brendon@shipreg.com>
Re: perl munching my memory <bwalton@rochester.rr.com>
Re: Perl NT and pipes embern@my-deja.com
Perl Script Request <admin@geosoft.org>
Re: Perl Script Request <uri@sysarch.com>
Re: Perl Script Request (Tad McClellan)
perl source -> colored html (Noble Thomas)
Re: perl source -> colored html <phrxy@csv.warwick.ac.uk>
Re: Perl Subroutines - some help required <the.pirla@NOSPAM.flashnet.it>
Perl Tk Socket <jimmy@blackhole-designs.com>
Re: Perl Tk Socket <aqumsieh@hyperchip.com>
Perl to PHP Conversion <rich@claripoint.com>
Re: Perl to PHP Conversion (Clinton A. Pierce)
Re: Perl to PHP Conversion (zawy)
Re: Perl to PHP Conversion (brian d foy)
perl won't run(can't set locale) <rubin@lucent.com>
Re: perl won't run(can't set locale) (Tad McClellan)
perl-5.6.0: Bug with "not" operator? ()
Re: perl-5.6.0: Bug with "not" operator? (Rafael Garcia-Suarez)
Re: perl-5.6.0: Bug with "not" operator? ()
Perl_markstack_ptr question... <gray_jNOgrSPAM@crane.navy.mil.invalid>
Perl_markstack_ptr question... <gray_jNOgrSPAM@crane.navy.mil.invalid>
Re: Perldoc and Windows98 <samay1NOsaSPAM@hotmail.com.invalid>
Perlshop <arnold@monstermakers.com>
platform-independent rand? Tom_Roche@ncsu.edu
Re: platform-independent rand? (Craig Berry)
Re: platform-independent rand? (Simon Cozens)
Re: platform-independent rand? (Craig Berry)
Re: platform-independent rand? (Ilya Zakharevich)
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 3 Jul 2000 16:25:12 +0200
From: "Brendon Caligari" <brendon@shipreg.com>
Subject: perl munching my memory
Message-Id: <8jq48s$ck3$1@news.news-service.com>
couldn't crack this one
tried this out on linux and win2000 (activstate)
#!/usr/bin/perl -w
use strict;
my(
@array,
);
print("Nothing in array\n");
<STDIN>;
open(MYFILE, "<file");
@array = <MYFILE>;
close(MYFILE);
print("File read\n");
<STDIN>;
print("Array cleaned\n");
@array = ();
undef(@array);
<STDIN>;
exit(0);
from task manager or linux ps-aux
when i read file (which was an 8mb file) the application chews up 24mb
memory space.
on @array=(); and undef(@array) the memory does not seem to be returned to
the heap space
any clue how i might 'return' this free space cleanly?
Thanks to all the good souls here who helped me. I hope in the future once
I come to terms with perl I'll be able to return a bit of favours. (I've
been a programmer for 6 years (C,), but have lost my virginity in perl only
a couple of weeks ago).
Brendon
------------------------------
Date: Tue, 04 Jul 2000 01:59:47 GMT
From: Bob Walton <bwalton@rochester.rr.com>
Subject: Re: perl munching my memory
Message-Id: <39614559.E0109816@rochester.rr.com>
Brendon Caligari wrote:
>
> couldn't crack this one
>
> tried this out on linux and win2000 (activstate)
>
> #!/usr/bin/perl -w
> use strict;
>
> my(
> @array,
> );
>
> print("Nothing in array\n");
> <STDIN>;
> open(MYFILE, "<file");
> @array = <MYFILE>;
> close(MYFILE);
> print("File read\n");
> <STDIN>;
> print("Array cleaned\n");
> @array = ();
> undef(@array);
> <STDIN>;
> exit(0);
>
> from task manager or linux ps-aux
> when i read file (which was an 8mb file) the application chews up 24mb
> memory space.
> on @array=(); and undef(@array) the memory does not seem to be returned to
> the heap space
>
> any clue how i might 'return' this free space cleanly?
...
> Brendon
Brendon, you should not expect Perl to return this space to the
operating system until Perl exits. If you use memory subsequently in
Perl, that space will be re-used, but it is not likely that it will be
returned to the operating system until Perl exits. The reason is
efficiency of memory management and the assumption that if you have
allocated storage in your Perl program and then freed it, you are likely
to simply allocate it again as you proceed. Perl can manage it for
Perl's purposes faster and better than the OS can, plus it somewhat
insulates Perl from the vagaries of the OS's memory management.
Depending upon your OS, you might be able to change this behavior by
compiling Perl to use the system malloc instead of Perl's built-in
malloc. See
perlfaq -q memory
--
Bob Walton
------------------------------
Date: Wed, 05 Jul 2000 14:00:40 GMT
From: embern@my-deja.com
Subject: Re: Perl NT and pipes
Message-Id: <8jvf1t$7v0$1@nnrp1.deja.com>
Ember wrote:
I'm using build 522 of Active State Perl on Windows 2000 (also tried on
NT and with PerlEx).
I'm trying to open a pipe to a C executable ($Cprog). I'm sending it an
input string ($inpstring) which consists of a line of text separated by
tabs. The C program takes the inputstring and calls another program
with it. The C program works and the input string gets piped from Perl.
open (RESULTS, "$Cprog \"$inpstring\"|");
The problem is that all the tabs get converted to spaces. If there are
several tabs in a row, there will be only one space.
-----
Ned wrote:
> It's possible that the NT command shell is eating the tabs.
> Does your C program get the tabs when you enter them at the command
> line or from a batch file?
>
> --
> Ned Konz
-----
Ember's reply:
Exactly. When we call the command from a batch file, it works fine.
But, when called from the perl program with a pipe, we lose all tabs.
Do you know a way around this?
Thank you,
Ember
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Thu, 6 Jul 2000 19:17:41 -0700
From: "Ggazan" <admin@geosoft.org>
Subject: Perl Script Request
Message-Id: <A6b95.61$GR6.44974@news.pacbell.net>
Does anyone have a perl script that can parse the source of an email and
split the information into variables such as From: and CC: and Subject?
Please let me know, Thanks,
-Greg
------------------------------
Date: Fri, 07 Jul 2000 03:12:54 GMT
From: Uri Guttman <uri@sysarch.com>
Subject: Re: Perl Script Request
Message-Id: <x74s62r5u0.fsf@home.sysarch.com>
>>>>> "G" == Ggazan <admin@geosoft.org> writes:
G> Does anyone have a perl script that can parse the source of an email and
G> split the information into variables such as From: and CC: and Subject?
there are many modules on cpan which can do that for you. go to cpan.org
and search for them. the Mail::* section has some useful stuff
uri
--
Uri Guttman --------- uri@sysarch.com ---------- http://www.sysarch.com
SYStems ARCHitecture, Software Engineering, Perl, Internet, UNIX Consulting
The Perl Books Page ----------- http://www.sysarch.com/cgi-bin/perl_books
The Best Search Engine on the Net ---------- http://www.northernlight.com
------------------------------
Date: Thu, 6 Jul 2000 23:44:18 -0400
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: Perl Script Request
Message-Id: <slrn8makgi.knt.tadmc@magna.metronet.com>
On Thu, 6 Jul 2000 19:17:41 -0700, Ggazan <admin@geosoft.org> wrote:
>Does anyone have a perl script that can parse the source of an email and
>split the information into variables such as From: and CC: and Subject?
http://www.plover.com/~mjd/perl/lp/Spam.html
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: 8 Jul 2000 00:45:45 GMT
From: nthomas@sun114-02.cise.ufl.edu (Noble Thomas)
Subject: perl source -> colored html
Message-Id: <8k5tjp$d8t$1@thunder.cise.ufl.edu>
I remember back when I was doing php coding, there was some PHP module, that
took an html file with embedded php in it and produced an html file that
essentially was the input file, only colorized.
I would like to do something similar with perl, a program that takes perl
source code in an ascii file, and produces an html file, which looks like
the input file, only colored (something like the syntax coloring of Vim).
Is there a program available that will do something like this?
i.e. something like this:
#!/local/bin/perl
if (1) {
$x = "hello world";
print "$x\n";
}
would produce something like this:
<html>
<body bgcolor=000000 text=ffffff>
<font color=9b30ff>#!/local/bin/perl</font><br>
<br>
<font color=ffff00>if</font> (<font color=ff7777>1</font>) {
<br>
<font color=00ffff>$x</font>
= <font color=ff7777>"hello world"</font>;<br>
<font color=ffff00>print</font>
<font color=ff7777>"</font><font color=00ffff>$x</font>
<font color=f4a460>\n</font><font color=ff7777>"</font>;
<br>
}<br>
<html>
--
N. Thomas
nthomas@cise.ufl.edu
http://www.cise.ufl.edu/~nthomas
------------------------------
Date: Sat, 8 Jul 2000 13:15:05 +0100
From: "John J. Lee" <phrxy@csv.warwick.ac.uk>
Subject: Re: perl source -> colored html
Message-Id: <Pine.SOL.4.21.0007081313570.4598-100000@mimosa.csv.warwick.ac.uk>
On 8 Jul 2000, Noble Thomas wrote:
[...]
> I would like to do something similar with perl, a program that takes perl
> source code in an ascii file, and produces an html file, which looks like
> the input file, only colored (something like the syntax coloring of Vim).
[...]
It doesn't answer this specific question, but have you read the perl FAQ
programming tools section?
John
------------------------------
Date: Mon, 10 Jul 2000 14:51:30 +0200
From: Pirla <the.pirla@NOSPAM.flashnet.it>
Subject: Re: Perl Subroutines - some help required
Message-Id: <lghjms09k7k57vm38t8vvrofkuu52b64np@4ax.com>
On Sun, 02 Jul 2000 06:25:52 GMT, anuragmenon@my-deja.com wrote:
>This is what I want to do
>
>1. Pass a string to a subroutine: How do I pass the parameter?
> It should return a file name after doing some manipulations to the
> string. This file then needs to be just directly opened on a browser
> from the calling program which is a CGI - script. The entire
> application is a CGI script. I dont plan to keep the subroutine in a
> seperate file. Just at the end of the same .pl file.
>
> I am writing some pseudocode down here. Let me know of your comments
All arguments passed to a subroutine are passed like a list.
>Now, the subroutine
>
>sub GenerateFileName{
my ($arg1, $arg2, $arg3 ...) = @_;
>
>----
>----
>-----
>----
>return $NewFileName;
>}
you can call the function in this way:
$result = GenerateFileName("...");
if you are syre that this function will return only one string.
I hope it's clear... because I don't speak very well English.
Ciao
Pirla
Per rispondere in E-mail the (punto) pirla (chiocciola) flashnet.it
*** un bacio ai pupi ***
---> Linux user since yesterday <---
------------------------------
Date: Mon, 10 Jul 2000 14:15:42 GMT
From: Jimmy Humphrey <jimmy@blackhole-designs.com>
Subject: Perl Tk Socket
Message-Id: <3969DA8F.B82A6EFF@blackhole-designs.com>
I have a problem:
I am attempting to run a socket connection with a telnet server, which
runs fine on it's own in dos prompt. It's on a chat/game server.
However, I've run into a delima. When I attempt to feed this
information into a scrolled text box, the info never appears until the
connection dies. I assume this is because the text box does not print
information until everything is gathered. Is there, however, a way I
could avoid this from happening? I have the socket opened and such when
the user clicks a button, and then I attempt to feed all the information
as I get it into the box. The source code is kinda lengthy, so I will
not post it. Any help appreciated.
ps. Yes, I already tried looking up info in the docs and tried the tk
newsgroup
Jimmy
--
Jimmy Humphrey <jimmy@blackhole-designs.com>
Web Designer - Black Hole Designs - http://www.blackhole-designs.com
------------------------------
Date: Mon, 10 Jul 2000 14:23:07 GMT
From: Ala Qumsieh <aqumsieh@hyperchip.com>
Subject: Re: Perl Tk Socket
Message-Id: <7ahf9ykqs4.fsf@merlin.hyperchip.com>
Jimmy Humphrey <jimmy@blackhole-designs.com> writes:
> I am attempting to run a socket connection with a telnet server, which
> runs fine on it's own in dos prompt. It's on a chat/game server.
> However, I've run into a delima. When I attempt to feed this
> information into a scrolled text box, the info never appears until the
> connection dies. I assume this is because the text box does not print
> information until everything is gathered. Is there, however, a way I
> could avoid this from happening? I have the socket opened and such when
> the user clicks a button, and then I attempt to feed all the information
> as I get it into the box. The source code is kinda lengthy, so I will
> not post it. Any help appreciated.
Please consider posting parts of the code that you think are causing the
problem. The way you are reading from you socket is definitely
relevant. I am assuming that you are doing something like:
while (<SOCKET>) {
do_stuff($_);
$text->insert('end', $_);
more_stuff();
}
If so, then add a call to update() after you insert() the text into the
Text widget:
$text->update;
Note also that this kind of I/O will prevent the user from doing
anything until the socket is closed (which is not really fun in a
game). So, if you don't do so already, consider using fileevent() to
check whether the socket has any data to read and keep control for the
user.
Of course, I can't help you any further because I don't see any code.
> ps. Yes, I already tried looking up info in the docs and tried the tk
> newsgroup
The Tk newsgroup (comp.lang.perl.tk) is more relevant. Posts there will
be replied to in a more suitable fashion.
--Ala
------------------------------
Date: Tue, 4 Jul 2000 16:34:36 +0100
From: "Rich Robinson" <rich@claripoint.com>
Subject: Perl to PHP Conversion
Message-Id: <txn85.7333$4C4.129483@news2-win.server.ntlworld.com>
Hello,
Does anyone know a "Perl to PHP Converter"? It's a long shot, I know...
Thanks for any replies,
Rich.
------------------------------
Date: Tue, 04 Jul 2000 16:54:15 GMT
From: clintp@geeksalad.org (Clinton A. Pierce)
Subject: Re: Perl to PHP Conversion
Message-Id: <XEo85.24002$fR2.216863@news1.rdc1.mi.home.com>
[Posted and mailed]
In article <txn85.7333$4C4.129483@news2-win.server.ntlworld.com>,
"Rich Robinson" <rich@claripoint.com> writes:
> Does anyone know a "Perl to PHP Converter"? It's a long shot, I know...
Yes. They can be leased for between $50-70/hour from most large
software contracting agencies.
--
Clinton A. Pierce Teach Yourself Perl in 24 Hours!
clintp@geeksalad.org for details see http://www.geeksalad.org
"If you rush a Miracle Man,
you get rotten Miracles." --Miracle Max, The Princess Bride
------------------------------
Date: Tue, 04 Jul 2000 18:15:04 GMT
From: zawy@yahoo.com (zawy)
Subject: Re: Perl to PHP Conversion
Message-Id: <3962201d.21726518@news.mindspring.com>
>Does anyone know a "Perl to PHP Converter"?
The death bell tolls.
90% of programming is, or will be, the HTML / XML web database.
PHP is better at it than Perl.
Therefore PHP is better than Perl for most programming.
Randal keeps saying:
>"PHP is training wheels without the bicycle."
This requires some modification in order to be made accurate. How
about:
"PHP is training wheels [that make it possible for most projects to be
completed] without the [luggage Perl straps on to its] bicycle."
Actually, I'm just mad because the Perl gurus snubbed the web and
simple programmers and let PHP take over. The web is big and
important not because it's a great "language", but because HTML is
easy.
------------------------------
Date: Tue, 04 Jul 2000 14:47:10 -0400
From: brian@smithrenaud.com (brian d foy)
Subject: Re: Perl to PHP Conversion
Message-Id: <brian-ya02408000R0407001447100001@news.panix.com>
In article <3962201d.21726518@news.mindspring.com>, zawy@yahoo.com (zawy) posted:
> >Does anyone know a "Perl to PHP Converter"?
> The death bell tolls.
> 90% of programming is, or will be, the HTML / XML web database.
this number is unsupportable. most of programming is not
the web. take a look around at all of the things which are
computers and which require some form of programming, and
ask "Is that the web?". not only may you be surprised at
how many things are not the web, but at how many things are
computers.
however, if you want to argue about whose better than XML,
then let's pull in Java.
> PHP is better at it than Perl.
perhaps you can elaborate on this. PHP is simply an HTML
embedded scripting langauge.
> Therefore PHP is better than Perl for most programming.
PHP is domain specific. outside of an HTML / web server
problem space, it can't do anything. you will still need
other programming languages.
if you like PHP for your programming, then use it. however,
don't expect real programmers (who know many languages) to think
you know anything.
--
brian d foy
CGI Meta FAQ <URL:http://www.smithrenaud.com/public/CGI_MetaFAQ.html>
Perl Mongers <URL:http://www.perl.org/>
------------------------------
Date: Fri, 07 Jul 2000 11:35:43 -0400
From: David L Rubin <rubin@lucent.com>
Subject: perl won't run(can't set locale)
Message-Id: <3965F8CF.116D1258@lucent.com>
I need help: when I run perl I get the following error:
[rubin@oblique:mp3]; perl -v
perl: warning: Setting locale failed.
perl: warning: Please check that your locale settings:
LANGUAGE = "en",
LC_ALL = "en",
LANG = "en"
are supported and installed on your system.
perl: warning: Falling back to the standard locale ("C").
This is perl, version 5.005_03 built for i386-linux
...
I tried using setenv to set LANGUAGE, LC_ALL, and LANG, but to no avail.
How to I make Perl work?
Please copy responses to my email. Thanks.
david
--
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
David L Rubin f/973.581.6665 v/973.386.8598
Lucent Technologies, NJ0117 14J-211, 67 Whippany Rd, Whippany, NJ 07981
------------------------------
Date: Fri, 7 Jul 2000 12:17:10 -0400
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: perl won't run(can't set locale)
Message-Id: <slrn8mc0k6.m16.tadmc@magna.metronet.com>
On Fri, 07 Jul 2000 11:35:43 -0400, David L Rubin <rubin@lucent.com> wrote:
>Subject: perl won't run(can't set locale)
^^^^^^^^^
"warnings" are not fatal.
"errors" are fatal.
>I need help: when I run perl I get the following error:
A search for "Setting locale failed" (with the quotes) in clp.misc at
http://www.deja.com/=dnc/home_ps.shtml
finds over 20 hits.
It is likely that your question has already been answered.
Please don't ask to have already answered questions answered
yet again.
>[rubin@oblique:mp3]; perl -v
>perl: warning: Setting locale failed.
>perl: warning: Please check that your locale settings:
> LANGUAGE = "en",
> LC_ALL = "en",
> LANG = "en"
> are supported and installed on your system.
>perl: warning: Falling back to the standard locale ("C").
perldoc perldiag
>This is perl, version 5.005_03 built for i386-linux
>...
>
>I tried using setenv to set LANGUAGE, LC_ALL, and LANG, but to no avail.
perldoc perllocale
>How to I make Perl work?
^^^^
If it really doesn't run, then you have a serious and strange problem...
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: Mon, 10 Jul 2000 14:09:56 GMT
From: mike@excite.com ()
Subject: perl-5.6.0: Bug with "not" operator?
Message-Id: <slrn8mjn33.rbq.mike@zorak.happyfish.org>
I'm having another slight problem with perl 5.6.0.
The "not" operator loses it low precedence when followed by a
parenthesized expression. Here are two examples that compare
results from perl version 5.00405 and perl version 5.6.0:
Example A
---------
perl -e 'if (not((2-2)-3)) {print 111} else {print 222}'
=======> 222
# In this case, I expect (2-2) to happen first, followed by - 3. That
# should give -3, a true value. Then the not is applied, which
# results in a false boolean expression. That is how it happens in
# 5.004_05, but 5.6.0 ignores the not. (Or maybe treats it like a
# function?)
perl -e 'if (not(2-2)-3) {print 111} else {print 222}'
5.00405
=======> 222
5.6.0
=======> 111
# Use a + to make it explicit. Should I really need this now?
perl -e 'if (not+(2-2)-3) {print 111} else {print 222}'
=======> 222
Example B
---------
# This example might give a better idea of what is going on.
perl -e 'print +(($a,$b)="abcdef"=~/(b.).*?(e.)/) ? "11 $a $b" : 22'
=======> 11 bc ef
perl -e 'print +(not(($a,$b)="abcdef"=~/(b.).*?(e.)/)) ? 11 : "22 $a $b"'
=======> 22 bc ef
perl -e 'print +(not($a,$b)="abcdef"=~/(b.).*?(e.)/) ? 11 : "22 $a $b"'
5.00405
=======> 22 bc ef
5.6.0
=======> Can't modify not in scalar assignment
perl -e 'print +(not+($a,$b)="abcdef"=~/(b.).*?(e.)/) ? 11 : "22 $a $b"'
=======> 22 bc ef
Thanks,
Mike
------------------------------
Date: Mon, 10 Jul 2000 15:47:41 GMT
From: rgarciasuarez@free.fr (Rafael Garcia-Suarez)
Subject: Re: perl-5.6.0: Bug with "not" operator?
Message-Id: <slrn8mjs9i.8k7.rgarciasuarez@rafael.kazibao.net>
mike@excite.com wrote in comp.lang.perl.misc:
>I'm having another slight problem with perl 5.6.0.
>
>The "not" operator loses it low precedence when followed by a
>parenthesized expression.
In fact, this is a feature. 'not' followed by parentheses behaves now like a
list operator. Look at perldelta.
--
Rafael Garcia-Suarez
------------------------------
Date: Mon, 10 Jul 2000 17:20:09 GMT
From: mike@excite.com ()
Subject: Re: perl-5.6.0: Bug with "not" operator?
Message-Id: <slrn8mk27p.re4.mike@zorak.happyfish.org>
Earlier, Rafael Garcia-Suarez <rgarciasuarez@free.fr> wrote:
>In fact, this is a feature. 'not' followed by parentheses behaves now like a
>list operator. Look at perldelta.
Doh! I can't believe I didn't see that. Thanks.
I don't think I like this change, though. This removes most of the
usefulness of the not operator, in my opinion.
Mike
------------------------------
Date: Thu, 06 Jul 2000 06:06:53 -0700
From: Jarrod Gray <gray_jNOgrSPAM@crane.navy.mil.invalid>
Subject: Perl_markstack_ptr question...
Message-Id: <05ce9d28.a4a2035f@usw-ex0106-046.remarq.com>
I've been playing around with Adobe's FDF Toolkit recently. I
think all my problems are due to the fact that FDF was compiled
and tested with perl v5.003_07 and I'm running v5.005_03. So I am
getting this error:
Can't load
'/usr/lib/perl5/5.00503/i386-linux/auto/Acrobat/FDF/FDF.so' for
module Acrobat::FDF:
/usr/lib/perl5/5.00503/i386-linux/auto/Acrobat/FDF/FDF.so:
undefined symbol: Perl_markstack_ptr at
/usr/lib/perl5/5.00503/i386-linux/DynaLoader.pm line 169.
It seems that perl has had something change in the loadable
module support. I think Perl_markstack_ptr has been replaced with
PL_markstack_ptr. Is there anyway I can get the compatibility to
work?
Thanks,
Jarrod Gray
-----------------------------------------------------------
Got questions? Get answers over the phone at Keen.com.
Up to 100 minutes free!
http://www.keen.com
------------------------------
Date: Thu, 06 Jul 2000 06:12:38 -0700
From: Jarrod Gray <gray_jNOgrSPAM@crane.navy.mil.invalid>
Subject: Perl_markstack_ptr question...
Message-Id: <091becd0.a622abd1@usw-ex0106-046.remarq.com>
I have recently been playing around with Adobe's FDF Toolkit.
I've run into this problem:
Can't load
'/usr/lib/perl5/5.00503/i386-linux/auto/Acrobat/FDF/FDF.so' for
module Acrobat::FDF:
/usr/lib/perl5/5.00503/i386-linux/auto/Acrobat/FDF/FDF.so:
undefined symbol: Perl_markstack_ptr at
/usr/lib/perl5/5.00503/i386-linux/DynaLoader.pm line 169.
I think this is due to the fact that FDF was compiled and tested
under perl 5.003_07 and Im running 5.005_03. Something has
evidently changed in the loadable module support between these
versions. Is there anything I can do to get this to work?
Thanks
Jarrod Gray
-----------------------------------------------------------
Got questions? Get answers over the phone at Keen.com.
Up to 100 minutes free!
http://www.keen.com
------------------------------
Date: Fri, 07 Jul 2000 08:32:15 -0700
From: Samay <samay1NOsaSPAM@hotmail.com.invalid>
Subject: Re: Perldoc and Windows98
Message-Id: <01c1fd80.2916bb5a@usw-ex0105-037.remarq.com>
I still have problem.
It gives fatal error with white foreground and blue background.
clicking on OK, goes back to the command prompt.
No, my machine isn't that slow..
It's around 500 MHz
and Ctrl-C doesn't work..
-----------------------------------------------------------
Got questions? Get answers over the phone at Keen.com.
Up to 100 minutes free!
http://www.keen.com
------------------------------
Date: Mon, 03 Jul 2000 14:18:43 -0500
From: Arnold Goldman <arnold@monstermakers.com>
Subject: Perlshop
Message-Id: <3960E542.6EA3@monstermakers.com>
Hello group:
I am looking to hire someone that knows how to work with Perlshop.
Preferably someone in the Northeastern Ohio area. I some simple
modifactions that I'd like to have done with my website and don't have
the time nor the experience to handle such a job. Anyone who is
interested, please e-mail.
arnold@monstermakers.com
------------------------------
Date: Wed, 05 Jul 2000 16:10:52 -0400
From: Tom_Roche@ncsu.edu
Subject: platform-independent rand?
Message-Id: <3963964C.BD09831B@ncsu.edu>
How platform-independent is rand?
I believe rand calls whatever OS service is provided. Is there a way
to tell rand what executable/system call/whatever to use?
Can one do a Perl RNG that, if given the same seed, would generate the
same sequence on various platforms (e.g. RH Linux, Solaris, NT)? (The
need for this uniformity has been pre-determined for me--don't ask :-)
Please reply directly to me as well as the list/group, and TIA,
Tom_Roche@ncsu.edu
------------------------------
Date: Thu, 06 Jul 2000 00:23:15 GMT
From: cberry@cinenet.net (Craig Berry)
Subject: Re: platform-independent rand?
Message-Id: <sm7kbj1bgas151@corp.supernews.com>
Tom_Roche@ncsu.edu wrote:
: How platform-independent is rand?
: I believe rand calls whatever OS service is provided. Is there a way
: to tell rand what executable/system call/whatever to use?
Based on my (poor) knowledge of the relevant internals, it seems recent
perls have implemented rand() directly, rather than by calling a system
or C library function.
: Can one do a Perl RNG that, if given the same seed, would generate the
: same sequence on various platforms (e.g. RH Linux, Solaris, NT)? (The
: need for this uniformity has been pre-determined for me--don't ask :-)
Given that the internals could change between versions or ports, it would
seem safest to implement your own random-number generator function (see
any good reference on statistical algorithms) as part of your code; then
you could guarantee its consistent behavior across platforms.
--
| Craig Berry - http://www.cinenet.net/users/cberry/home.html
--*-- "Beauty and strength, leaping laughter and delicious
| languor, force and fire, are of us." - Liber AL II:20
------------------------------
Date: 6 Jul 2000 07:39:14 GMT
From: simon@brecon.co.uk (Simon Cozens)
Subject: Re: platform-independent rand?
Message-Id: <slrn8m8dt2.un.simon@othersideofthe.earth.li>
Craig Berry (comp.lang.perl.moderated):
>Based on my (poor) knowledge of the relevant internals, it seems recent
>perls have implemented rand() directly, rather than by calling a system
>or C library function.
That does not appear to be the case:
if (!PL_srand_called) {
(void)seedDrand01((Rand_seed_t)seed());
PL_srand_called = TRUE;
}
value *= Drand01();
Drand01 and seedDrand01 are Configure macros.
--
Pray to God, but keep rowing to shore.
-- Russian Proverb
------------------------------
Date: Thu, 06 Jul 2000 17:52:29 GMT
From: cberry@cinenet.net (Craig Berry)
Subject: Re: platform-independent rand?
Message-Id: <sm9hqtjggas109@corp.supernews.com>
Simon Cozens (simon@brecon.co.uk) wrote:
: Craig Berry (comp.lang.perl.moderated):
: >Based on my (poor) knowledge of the relevant internals, it seems recent
: >perls have implemented rand() directly, rather than by calling a system
: >or C library function.
:
: That does not appear to be the case:
:
: if (!PL_srand_called) {
: (void)seedDrand01((Rand_seed_t)seed());
: PL_srand_called = TRUE;
: }
: value *= Drand01();
:
: Drand01 and seedDrand01 are Configure macros.
As often happens to me on my excursions into the Perl source, I got lost
in a maze of twisty little macros, all alike. Thanks for the catch.
Still, I stand by my recommendation of do-it-yourself random number
generation if you need guaranteed consistency across platforms or perl
versions.
--
| Craig Berry - http://www.cinenet.net/users/cberry/home.html
--*-- "Beauty and strength, leaping laughter and delicious
| languor, force and fire, are of us." - Liber AL II:20
------------------------------
Date: 6 Jul 2000 21:19:41 GMT
From: ilya@math.ohio-state.edu (Ilya Zakharevich)
Subject: Re: platform-independent rand?
Message-Id: <8k2t5d$khe$1@charm.magnus.acs.ohio-state.edu>
[A complimentary Cc of this posting was sent to Craig Berry
<cberry@cinenet.net>],
who wrote in article <sm9hqtjggas109@corp.supernews.com>:
> As often happens to me on my excursions into the Perl source, I got lost
> in a maze of twisty little macros, all alike.
a) Install imenu-go.el (optional, available from
ftp://ftp.math.ohio-state.edu/pub/users/ilya/emacs
);
b) Run
make etags
Now you can follow all these macros immediately, including the
metaconfig config_h.SH generator.
Ilya
------------------------------
Date: 16 Sep 99 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 16 Sep 99)
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.
| NOTE: The mail to news gateway, and thus the ability to submit articles
| through this service to the newsgroup, has been removed. I do not have
| time to individually vet each article to make sure that someone isn't
| abusing the service, and I no longer have any desire to waste my time
| dealing with the campus admins when some fool complains to them about an
| article that has come through the gateway instead of complaining
| to the source.
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.
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 V9 Issue 3591
**************************************
