[8554] in Perl-Users-Digest

home help back first fref pref prev next nref lref last post

Perl-Users Digest, Issue: 2171 Volume: 8

daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue Mar 24 10:17:20 1998

Date: Tue, 24 Mar 98 07:00:49 -0800
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)

Perl-Users Digest           Tue, 24 Mar 1998     Volume: 8 Number: 2171

Today's topics:
    Re: Calling all Newbies <fty@utk.edu>
    Re: Creating a unique id number? <zenin@archive.rhps.org>
    Re: Creating a unique id number? (Clinton Pierce)
        crypt paranoia ? (*/chebs)
        Does Anyone know how to solve this SunOS perl5.004 comp aldeav@aud.alcatel.com
    Re: Function for adding days to a date ? (John Klassa)
    Re: Function for adding days to a date ? (Mike Stok)
    Re: Function for adding days to a date ? <quentin.fennessy@amd.com>
        How to use the POST at Common.pm with a hash as argumen (Lab. - konto Algi-2)
    Re: Make people read the docs, was: Re: PerlRing??? (Joergen W. Lang)
        mirror (LWP::Simple) is acting like getstore!!!! <vanucci@sp.dglnet.com.br>
    Re: Not the usual ``won't run on my browser'' problem.  <jerryp.usenet@connected.demon.co.uk>
    Re: Passing reference to array of hashes: a better way? (Richard Bellavance)
    Re: perl databases ?? jimschwartzson@usa.net
    Re: Perl Databases... (Kevin Reid)
        Perl on Win95 - CMD32 - File Length Restriction ? <jmatey@sarnoff.com>
    Re: Printing from Perl on NT box (Jeffrey R. Drumm)
        runtime exception in activestate perl when using module <tim@hcirisc.cs.binghamton.edu>
    Re: Stinking lousy $*(@#*$@ cmd lin args-HELP (Peter Caffin)
        suid under AIX <ren@adv.magwien.gv.at>
        The use of Perl extensions <preilly@everest.spd.analog.com>
    Re: trouble with \r <pdcawley@bofh.org.uk>
    Re: trouble with \r <Tony.Curtis+usenet@vcpc.univie.ac.at>
        WEB Based E-mail Reader. jglopez@javercol.javeriana.edu.co
    Re: What does "UNIX" stand for.. <akulkis@be1151.pd3.ford.com>
    Re: What's up with the debugger? (Jason Gloudon)
    Re: Where to get Perl compiler for Win95 or Win NT? jimschwartzson@usa.net
    Re: Where to get Perl compiler for Win95 or Win NT? (Mike Stok)
    Re: Where to get Perl compiler for Win95 or Win NT? <barfly@Karkamiel.COM>
    Re: Where to get Perl compiler for Win95 or Win NT? (Jason Gloudon)
    Re: Where to get Perl compiler for Win95 or Win NT? <mglenn@no.spam.zbzoom.net>
    Re: Where to get Perl compiler for Win95 or Win NT? (Jason Gloudon)
        Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)

----------------------------------------------------------------------

Date: Tue, 24 Mar 1998 08:08:34 -0500
From: Jay Flaherty <fty@utk.edu>
Subject: Re: Calling all Newbies
Message-Id: <3517B052.A9D59188@utk.edu>

Doug Evans wrote:

> It seemed's to me, that if we formed a list, we could create a usable faq,
> based on our experiences, as newbies, struggling to learn, that would serve
> as a learning tool, for future newbies.

Sounds like the original perl charter. Just substitute "newbie" for "perl
programmers". This is a fine idea, just try and get any newbie to read this
"newbie" FAQ is the problem. If you succeed, pass the information onto c.l.p.m
for we are hungry for a solution as to how to get people to do just this. It
seems people need more hand holding than there are hands. The advice to help
those who help themselves falls on deaf ears. Good luck on your endeavor...jay



------------------------------

Date: 24 Mar 1998 12:05:51 GMT
From: Zenin <zenin@archive.rhps.org>
Subject: Re: Creating a unique id number?
Message-Id: <890741523.829913@thrush.omix.com>

[ posted & mailed ]

Jarkko Hietaniemi <jhi@alpha.hut.fi> wrote:
: I want to see a server which can spawn 32767 processes in one second.
	>snip<

	$ time ./foo

	real    0m1.306s
	user    0m0.039s
	sys     0m0.517s
	$ cat foo.c
	
	#include <stdio.h>
	
	int foo = 0;
	
	main () {
	    while (1) {
	        foo++;
	        fork() || exit(0);
	        if (foo == 32767) {
	            exit (0);
	        }
	    }
	}

	Ok, so it's just over a second (3/10 of a second to be exact).

	Note however that this is on a pretty well loaded P5/200mhz (x86
	hardware here) box with only 64 megs of ram running FreeBSD.  I'm
	pretty sure this time could be cut in half or more on a P2/300
	still running FreeBSD, and lord knows what our Sun Enterprise 3000
	would cut it down to.

	The fact is, this can and is a real problem, unless you're running
	NT as your (laugh) server, but then you've got much worse problems
	then this to worry about. :-)

-- 
-Zenin
 zenin@archive.rhps.org


------------------------------

Date: 24 Mar 1998 14:18:38 GMT
From: cpierce1@cp500.fsic.ford.com (Clinton Pierce)
Subject: Re: Creating a unique id number?
Message-Id: <6f8fbu$prp1@eccws1.dearborn.ford.com>

In article <oeehg4o5rib.fsf@alpha.hut.fi>,
	Jarkko Hietaniemi <jhi@alpha.hut.fi> writes:
>
>Calle Dybedahl <qdtcall@esb.ericsson.se> writes:
>
>> > my $id = $$.time;
>> 
>> This might cause collisions on a heavily loaded server (if the pids
>> wrap around within a single second). Also, it is easily predictable
>
>I want to see a server which can spawn 32767 processes in one second.
>

I wanna see COBOL code written in 1967 make it all the way to the
year 2000.  Unlikely!



Clinton "Who needs 4-digit years anyways" Pierce
-- 
+------------------------------------------------------------------------+
|  Clinton A. Pierce    |   "If you rush a Miracle Man,   | http://www.  |
|  cpierce1@ford.com    |     you get rotten miracles"    | dcicorp.com/ |
| fubar@ameritech.net   |--Miracle Max, The Princess Bride| ~clintp      |
+------------------------------------------------------------------------+
GCSd-s+:+a-C++UALIS++++P+++L++E---t++X+b+++DI++++G++e+>++h----r+++y+++>y*



------------------------------

Date: Tue, 24 Mar 1998 14:38:02 GMT
From: chebs@elfin.org (*/chebs)
Subject: crypt paranoia ?
Message-Id: <3517c22b.18069373@news.demon.co.uk>


hi there.

I've been trying to use crypt on a win95 system and keep getting
errors.

I have been trying to use '$passwd = crypt($passwd,MW);'

Perl keeps telling me I'm paranoid ?

'The crypt() function is unimplemented due to excessive paranoia'

I have looked through the docs but I can't find any mention of 
having to configure anything special for win95 to use crypt

Can anybody help? please

chebs
@elfin.org


------------------------------

Date: 24 Mar 1998 13:55:28 GMT
From: aldeav@aud.alcatel.com
Subject: Does Anyone know how to solve this SunOS perl5.004 compile problem?
Message-Id: <6f8e0g$hl2@news01.aud.alcatel.com>
Keywords: SunOS per5.004 compile

When I run the makefile for perl5.004_04 on a Sun 4.1.3 machine
using gcc 2.7.2 I get the following error message for hv.c:
hv.c: In function `Perl_hv_fetch_ent':
hv.c:179: parse error before `HEK'
hv.c:179: parse error before `)'
hv.c: In function `Perl_hv_iternext':
hv.c:919: parse error before `HEK'
hv.c:919: parse error before `)'
*** Error code 1

If anyone has had this same problem and has found a solution, I would appreciate
hearing from you.



-- 

  Al Alder
  aldeav@aud.alcatel.com
  Alcatel Telecom
  972/996-5519




------------------------------

Date: 24 Mar 1998 13:38:04 GMT
From: klassa@aursgh.aur.alcatel.com (John Klassa)
Subject: Re: Function for adding days to a date ?
Message-Id: <6f8cvs$ibs$1@aurwww.aur.alcatel.com>

On Fri, 20 Mar 1998 10:57:30 GMT, ak@informatik.tu-cottbus.de wrote:
->Is there a function which can add x days/months/weeks to a given date ??

Try Date::Manip.

-- 
John Klassa / Alcatel Telecom / Raleigh, NC, USA <><


------------------------------

Date: 24 Mar 1998 14:00:08 GMT
From: mike@stok.co.uk (Mike Stok)
Subject: Re: Function for adding days to a date ?
Message-Id: <6f8e98$9nl@news-central.tiac.net>

In article <1104_890391450@na.informatik.tu-cottbus.de>,
 <ak@informatik.tu-cottbus.de> wrote:
>Is there a function which can add x days/months/weeks to a given date ??
>
>Please help !

If you visit a CPAN (comprehensive perl archive network) site you can pick
up the Date::Manip module whose documentation includes: 

       5.  Add a time offset to a date to get a second date (i.e.
       determine the
           date 132 days ago or 2 years and 3 months after Jan 2,
      1992)

or the Date::DateCalc module which has a load of useful routines in it.

One way to visit CPAN is to point a web browser at http://www.perl.com and
follow the CPAN links.  Another is to ftp to ftp.funet.fi and look under
/pub/languages/perl/CPAN.  

This assumes that you're using perl 5.xxx.

Hope this helps,

Mike

-- 
mike@stok.co.uk                    |           The "`Stok' disclaimers" apply.
http://www.stok.co.uk/~mike/       |   PGP fingerprint FE 56 4D 7D 42 1A 4A 9C
http://www.tiac.net/users/stok/    |                   65 F3 3F 1D 27 22 B7 41
stok@colltech.com                  |            Collective Technologies (work)


------------------------------

Date: 24 Mar 1998 08:08:08 -0600
From: Quentin  Fennessy <quentin.fennessy@amd.com>
Subject: Re: Function for adding days to a date ?
Message-Id: <xim1zvsyyev.fsf@jihad.amd.com>

ak@informatik.tu-cottbus.de writes:

> Is there a function which can add x days/months/weeks to a given date ??

You should realize that time in Perl is the Unix epoch -
try this:

  perl -e 'print time, "\n"'

If the time right now is 890748243, then the time in the future
can be calculated by adding the appropriate number of seconds
to the current time.

    main::(-e:1):	1
    DB<1> $t = time

    DB<2> print $t
    890748192

    DB<3> print time
    890748217

    DB<9> print scalar localtime($t)
    Tue Mar 24 08:05:49 1998

    DB<4> $t += 60 * 60 * 24 

    DB<5> print $t
    890834592

    DB<7> print scalar localtime($t)
    Wed Mar 25 08:03:12 1998

This stores the current time in $t, and then adds a
days worth of seconds to it.  

Check out 

	perldoc -f time
	perldoc -f localtime

There are also date manipulation packages available 
in CPAN.

-- 
Quentin Fennessy			AMD, Austin Texas
Secret hacker rule #11 - hackers read manuals


------------------------------

Date: 24 Mar 1998 12:38:49 GMT
From: algi-2@mdstud.chalmers.se (Lab. - konto Algi-2)
Subject: How to use the POST at Common.pm with a hash as argument
Message-Id: <6f89gp$mvb$1@nyheter.chalmers.se>

I use the POST, like this:
$res= $ua->request(POST 'http://www.dxshop.com/admin/products-add.mhtml?ACTION=save&STORE=asd&PASSWORD=asd',
       [ productcode  => $vara[0],
	prodweight => $vara[3],
	$vara[7] => $vara[7],
	prodpagelayout =>layout2,]);     

but sometimes I would like to add more things that are in the form,
eh, like this:
$res= $ua->request(POST 'http://www.dxshop.com/admin/products-add.mhtml?ACTION=save&STORE=asd&PASSWORD=asd',
       [ productcode  => $vara[0],
	prodweight => $vara[3],
	$vara[7] => $vara[7],
        $vara[8] => $vara[8],
	$vara[9] => $vara[9],
	prodpagelayout =>layout2,]);     


So it will differs from depening on which line I process from the infile,
my idea was to create a hash with all entries that I want to post,
so something like this:
%tt = ( productcode  => $vara[0],
	prodweight => $vara[3],
	$vara[7] => $vara[7],
        $vara[8] => $vara[8],
	$vara[9] => $vara[9],
	prodpagelayout =>layout2,)

$res= $ua->request(POST 'http://www.dxshop.com/admin/products-add.mhtml?ACTION=save&STORE=asd&PASSWORD=asd',
       [%tt]);


but that won't work. My question (quite stupid, but I cant seem to get it right)
is: what kind of structure shall I have as the second argument to request, when
I wish to accomplish something like this.

Hope you see what I'm getting at.

all best,

/Calle


these are spammers:
-------------------
root@207.110.0.53
webmaster@207.110.0.53
admin@united-cbe.org
webmaster@smallbizcentre.com
root@smallbizcentre.com
webmaster@web-tiger.com
greg2@ptdprolog.com
webmaster@myconet.com
root@127.0.0.1
postmaster@127.0.0.1
webmaster@127.0.0.1
info@127.0.0.1
sales@127.0.0.1
fraud@UU.NET (MassMail Complaint)
spam-complaint@UU.NET (Usenet Complaint)
abuse@hotmail.com
net-abuse@nocs.insp.irs.gov
fraud@uspis.gov
fraudinfo@psinet.com
piracy@spa.org
postmaster@fbi.gov
contact@bsa.nl
downwithwarez@hotmail.com
postmaster@cyberpromotions.com
postmaster@cyberpromo.com
postmaster@mail-promo.com
FreeWay5@dm1.com
toby@becsplace.com
associates@savoynet.com
wmgroupr@pobox.com
51189123456@aol.com
74072325@compuserve.com
abanks@ultramax.net
link-signup@chac.com
frick@bigfoot.daltek.net
05838448@ibm.net
nobber@ibm.net
computerphys@hotmail.com
privuser@mailexcite.com
Important@usa.net
456S15P1008@juno.com
1mktg00@juno.com
members@your.com
netbiz@03403.com
neil@venus.gmds.com
homedirectory@hotmail.com
webtech@mmaildirect.com
dstadler@savoynet.com
Majordomo-Owner@rtfm.be
sendnim@15509.com
52614725@ismi.net
postmaster@icat.com
webmaster@icat.com
Racanaw@TRIValley.com
harmony@ultra-mail.com
39988580@hotmail.com
UcanDoit@hotmail.com
UcanDoit@kolomiec.rosmail.com
charel@cyberopp.com
aarica@chacaltaya.com
nt@ntec.net
1056_fred@flash.net
2760_ur@careeropp.com
deserthome@worldnet.att.net
MoneyMaker18@juno.com
associates@bigfoot.daltek.net
panzer@goplay.com
2700_dave@cymx.net
osgood@aixmiced.mi.unicatt.it



------------------------------

Date: Tue, 24 Mar 1998 14:28:17 +0100
From: joergen.lang@schwaben.de (Joergen W. Lang)
Subject: Re: Make people read the docs, was: Re: PerlRing???
Message-Id: <1d6ean3.1489fe512v49j4N@host005-206.seicom.net>

brian d foy <comdog@computerdog.com> wrote:

> In article <1d6cgm8.1sqf3nuxzyw00N@host037-206.seicom.net>,
> joergen.lang@schwaben.de (Joergen W. Lang) posted:
> 
> >Ok, let me try a different approach.
> >
> >### Scenario 1a: Perl on local machine, soft way: ###
> >
> >- A slightly extended perl -v is made default. This will come up
> >everytime Perl is started unless disabled, like this:
> 
> >### Scenario 1b: Perl on local machine, hard way: ###
> >
> >Perl just won't run, if there is no documentation on the user's machine.
> >Instead the user is presented with a message like this:
> 
> 
> yep, let's punish the people who know what they are doing as well.

By suggesting these points I did not intend to "punish" anyone.
  
By having to look up how to disable the initial message people
automatically know where the docs are, that there is a faq and thus
where they can look up things and get (almost) instant answers.

In my second idea I was going a bit further, true. But, in most cases,
the docs are there, anyway. I cannot see anything bad with a "Please
locate the documentation"- message at startup - and that's only if the
docs are not installed (in the right location).

If perl knew where its help docs are (@INC ?) you could even go "use
help;" or the likes. Maybe you could even access the docs from within a
script (like on a Mac).

But the third scenario is probably that, where most beginners get their
trouble from. They get a script from, say
http://www.cgi-resources.com/Programs_and_Scripts/Perl, they don't have
perl on their own machine, they don't have shell access on their ISP's
machine, they don't know about the docs, but they want to get that 
darn guestbook script running - _now_ ...and they know about a perl
newsgroup.... 
Including one or two lines in those scripts pointing to the right
resources could take a lot of weight from clpm.


Joergen 
--
-------------------------------------------------------------------
"Everything is possible - even sometimes the impossible" HOELDERLIN
EXPRESS - "Touch the void"
-------------------------------------------------------------------


------------------------------

Date: Mon, 23 Mar 1998 10:13:06 -0300
From: "Fabiano Vanucci" <vanucci@sp.dglnet.com.br>
Subject: mirror (LWP::Simple) is acting like getstore!!!!
Message-Id: <890745297.624594@citroen.dglnet.com.br>

I'm using  this code

if (is_success(mirror("http://www.yahoo.com/","yahoo")))

        print "<h2>mirror Update com sucesso</h2>\n\n";

 } else {
        print "<h2>mirror Erro no update!</h2>\n\n";

 }


but it is writing the result to a file called "yahoo", just like
if (is_success(getstore("http://www.uahoo.com/","yahoo")))

        print "<h2>Update com sucesso</h2>\n\n";
} else {
        print "<h2>Erro no update!</h2>\n\n";
}

The problem is that (of course) I want to compar the new result of mirror
with my file "yahoo", but mirror overwrites it and always result with
success.

Can any one help me?

Fabiano Vanucci





------------------------------

Date: Tue, 24 Mar 1998 13:01:15 +0000
From: Jerry Pank <jerryp.usenet@connected.demon.co.uk>
Subject: Re: Not the usual ``won't run on my browser'' problem. Modules or me?
Message-Id: <JTaFTGAb66F1Ewkb@connected.demon.co.uk>

In <comp.lang.perl.misc> 
Jerry Pank <jerryp.usenet@connected.demon.co.uk>, writes:

>my $tree=parse_htmlfile("test.html");
File not found in server mode__/

Double Doh!

# Thanks to Guy Decoux.

Would Carp tell me about this?
-- 
Jerry Pank           mailto:jerryp.usenet@connected.demon.co.uk

Real programmers can write assembly code in any language.   :-)
-- Larry Wall in  <8571@jpl-devvax.JPL.NASA.GOV>


------------------------------

Date: 24 Mar 1998 09:30:44 -0500
From: charlot@CAM.ORG (Richard Bellavance)
Subject: Re: Passing reference to array of hashes: a better way?
Message-Id: <6f8g2k$njc@ocean.CAM.ORG>

In article <6f6eho$m48$1@nnrp1.dejanews.com>,  <spamfree@yahoo.com> wrote:
>
>Is this the way to do it?  Or should I pass a reference to an array *into* the
>function, and have the function load it up?  The problem I'm having is that
>when I try to access the data, like this:
>
>*pdata = readpmdata $fname;
>

You don't have to use a typeglob here.  The "correct" way to get the
reference back from readpmdata would be:

    $pdata = readpmdata $fname;

You can then access the elements with $pdata->[0], etc...  If instead you
want a "real" array, you can create it from the reference with:

    @pdata = @{$pdata};

Hope this helps,
Richard.
-- 
Richard Bellavance -- charlot@cam.org -- http://www.cam.org/~charlot/
    "All along this path I tread  /  My heart betrays my weary head
     With nothing but my love to save / From the cradle to the grave"
                                 (Eric Clapton, "From the cradle")


------------------------------

Date: Tue, 24 Mar 1998 05:19:44 -0800
From: jimschwartzson@usa.net
Subject: Re: perl databases ??
Message-Id: <3517B2F0.2B93@usa.net>

Andrew Lee (Parenttime) wrote:
> > ... With
> > this in mind, what type of database should I use, and where do I
> > start?
> 
> If you have access to an SQL database, use DBI.  If the only relational
> databse you can get at is mSQL, use the MSQL-Perl module.

Andrew: This leads me to believe that you would prefer the msql-perl
module over the DBI module for use with msql. Am I correct in assuming
this? I'm a newbie, but I do have DBI working. My assumption is that
DBI is not only better, but it's where it's going. For this reason I
haven't even looked at the msql-perl module.

Thanks


------------------------------

Date: Tue, 24 Mar 1998 09:12:45 -0500
From: kpreid@ibm.net (Kevin Reid)
Subject: Re: Perl Databases...
Message-Id: <1d6cudp.yujqzv4ifpiN@slip166-72-108-186.ny.us.ibm.net>

Bill Lewis <Bill.Lewis@mci.com> wrote:

> Then in the script I assign keys and values like such:
> 
> %info = $key => $value;

$info{$key} = $value;

-- 
  Kevin Reid.      |         Macintosh.
   "I'm me."       |      Think different.


------------------------------

Date: Tue, 24 Mar 1998 09:21:43 -0500
From: "James R. Matey" <jmatey@sarnoff.com>
Subject: Perl on Win95 - CMD32 - File Length Restriction ?
Message-Id: <3517C177.62A91873@sarnoff.com>

Dear newsgroup,

(My newsgroup server scrolls off quickly.  If convenient, please
copy any response to jmatey@sarnoff.com, as well as the newsgroup.
Advice on the correct perl newsgroup for future postings would
be welcome, since I have just begun reading these groups.)

I have a perl script which parses a data file.  It runs
perfectly on a UNIX machine.  

Under Win95, it fails to process the tail end of a ~24 MB
file.  I am processing the file line by line, so that there
is no issue of running out of memory.  There is no error 
message - the program simply behaves as if it had run into
an EOF before it reaches the end of file.

If I take the tail of the file (1 MB or so) - the script processes
that part of the file just fine (under Win95)

If I remove ~4 MB from the front of the file - the script processes
the remaining ~20 MB of the file just fine (under Win95).

Hence, all parts of the file are processed properly, but under
Win95, the script fails for an input file of somewhere between
20 and 24 MB -- and gives no indication of the error.  It is
as if the program reached EOF before the end of the file.

I have seen a similar problem with the DOS version of grep which
comes with Borland C++.  The problem does not arise with the 
MKS Utility egrep, which runs
in the MKS Korn shell (which I believe is 32 bit).  Hence,
I suspect a file length limitation of some sort in the command
shell but do not understand why the CMD32.exe shell does not
relieve the problem.

I have tried installing the CMD32.exe for Perl for Win95 as
suggested for some DOS problems.  No change (even after reboot). 

My workaround for now is to copy files to a UNIX box, process there
and transfer back to the Win95 boxes.

If anyone can provide advice, I would be appreciative.

Thanks,

Jim Matey
-- 
James R. Matey

jmatey@sarnoff.com
www.sarnoff.com
609-734-2868

Mailing Address:
Sarnoff Corporation
201 Washington Rd.
Princeton, NJ 08543-5300

Shipping Address:
Sarnoff Corporation
201 Washington Rd.
Princeton, NJ 08540-6449


------------------------------

Date: Tue, 24 Mar 1998 12:52:15 GMT
From: drummj@mail.mmc.org (Jeffrey R. Drumm)
Subject: Re: Printing from Perl on NT box
Message-Id: <3517aacd.60224408@news.mmc.org>

On Mon, 23 Mar 1998 19:48:52 -0600, robert.abarbanel@boeing.com wrote:

>How do I open a filehandle for printing in Perl on NT?
>
>I want to be able to do something like
>open(P,"some way to designate a printer");
>print P "this string goes to printer";
>close P;
>
>Or - I need some way to accomplish the equivalent on NT.
>
>Thanks!

You apparently need to create a share for the printer in question, and open the
share for output:

open PRINTER,'>//computer_name/printer_name' or die "Dammit! $!\n";
print PRINTER $stuff_to_print;
close PRINTER;

I tried opening LPT1: for the local printer, but Perl seemed to send it
straight to the City of Lost Bytes . . .

-- 
                               Jeffrey R. Drumm, Systems Integration Specialist
                       Maine Medical Center - Medical Information Systems Group
                                                            drummj@mail.mmc.org
"Broken? Hell no! Uniquely implemented!" - me


------------------------------

Date: 24 Mar 1998 08:20:45 -0500
From: Tim Gray <tim@hcirisc.cs.binghamton.edu>
Subject: runtime exception in activestate perl when using modules
Message-Id: <t0soo8kyxe.fsf@hcirisc.cs.binghamton.edu>

Hi there,
	I am trying to port a bunch of scripts, mostly CGI, from UNIX
to NT.  I have little to no problem when using Mr. Sarathy's port, but
when I try to use the one from activestate, which I need to use for
PerlScript, I get runtime exceptions when I use modules.  I found the
fix for the Win32::ODBC module from Dave Roth, but I am currently
having a problem with Date::DateCalc.  Is there something I should be
doing to get the modules to play nice?  Thanks.

Tim Gray


------------------------------

Date: Tue, 24 Mar 1998 13:40:47 GMT
From: UCE-trap_synic@omen.net.au (Peter Caffin)
Subject: Re: Stinking lousy $*(@#*$@ cmd lin args-HELP
Message-Id: <35199dbe.3058563@news.omen.net.au>

Eric Bohlman <ebohlman@netcom.com> did cunningly address to
comp.lang.perl.misc..
:The majority of CGI programmers (certainly all the novice ones) would be 
:much better off if they used CGI.pm and treated parameter-passing as a 
:black box.  I'm normally all for fully understanding what you're doing, 
:but I see too many CGI programmers reinventing the wheel for the 
:millionth time, and too many of the wheels they reinvent are out of true.

Probably the best of both worlds is (as you'd expect) a little bit of both.
When I was learning Perl, I copied a CGI snippet from a textbook. Then, I used
that snippet cut-pasted in all of my Perl CGI scripts. A black box with
transparent walls, essentially.

As I learned more and more about Perl regular expressions, more and more of
the CGI source I was using made sense. Finally, I'm starting to understand
exactly how and why it works and what makes that original snippet a really
cool bit of code :).

--:     _         ___  _    _ _ 
 _oo__ |_|_ |__  _ |  |  _ |_|_' _   synic at omen dot net dot a u
//`'\_ | (/_|(/_| .|. |_(_|| | || |  http://www.omen.net.au/~synic
/              PO Box 869, Hillarys WA 6923, AUSTRALIA


------------------------------

Date: Tue, 24 Mar 1998 13:17:41 +0100
From: Reisel Nikolaus <ren@adv.magwien.gv.at>
Subject: suid under AIX
Message-Id: <3517A464.EC36AC52@adv.magwien.gv.at>

I've compiled perl5.004_04 built for aix4.2.0.0 with gcc2.8 - all tests
ok

I compiled with support for suid !

My problem: it doesnot work - no suid

My test script:

#!/usr/local/bin/perl

print "User-ID:";

$id = `/bin/id`;

print "$id\n";

My Output:

Can't reswap uid and euid.

What's the problem Please help

Answers via E-Mail Please !!

--
   _\|/_        REISEL Nikolaus ES4 - Network Development
   (O O)        Municipality of Vienna, Municipal Department 14
oOO-(_)-OOo     Rathausstra_e 1, A-1082 Vienna, Austria
                E-mail: ren@adv.magwien.gv.at





------------------------------

Date: 24 Mar 1998 09:42:34 -0500
From: Paul Reilly <preilly@everest.spd.analog.com>
Subject: The use of Perl extensions
Message-Id: <n7hyay0kv51.fsf@everest.spd.analog.com>


I am currently wrestling with the strategy to use in interfacing an
existing interactive C++ program to an encompassing Perl program being
developed.

The choices have boiled down to using a traditional IPC connection
using PTYs or using either Swig or XS to take advantage of an existing
programatic interface to control the C++ program directly from Perl.

Both Swig and XS look daunting.  There is also a question about C++
initialization, as in how to correctly initialize the C++ program.
And the examples I've seen in the O'Reilly books and in the man pages
are sort of simple, leading me to wonder if I might be straining
either XS or Swig.

Any opinions, guidance or comments would be much appreciated.

Thanks,

-- 
Paul Reilly                             Analog Devices, Inc.
Paul.Reilly@analog.com                  Three Technology Way
Phone: 781 461 3156                     Norwood, MA  02062-9106  USA


------------------------------

Date: 24 Mar 1998 13:26:34 +0100
From: Piers Cawley <pdcawley@bofh.org.uk>
Subject: Re: trouble with \r
Message-Id: <s7p90q0ff5x.fsf@legolas.elsevier.nl>

Tony Curtis <Tony.Curtis+usenet@vcpc.univie.ac.at> writes:

> Re: trouble with \r, John <pamdirac@mindspring.com> said:
> 
> John> I don't want to be flooded with these lines, however,
> John> so I'm trying to use carriage-return instead of
> John> newline b/w the indicator lines.  It worked fine for
> 
> stdout is by default line-buffered so you have to unbuffer
> it.
> 
>     use FileHandle;
>     autoflush STDOUT 1;

What on earth is wrong with 

      $| = 1;

Loading an entire module to do something you can do more efficiently
simply by setting a variable seems to be somewhat perverse.

-- 
Piers Cawley
<This space to let>


------------------------------

Date: 24 Mar 1998 13:52:13 +0100
From: Tony Curtis <Tony.Curtis+usenet@vcpc.univie.ac.at>
Subject: Re: trouble with \r
Message-Id: <7x90q045fm.fsf@beavis.vcpc.univie.ac.at>

Re: trouble with \r, Piers <pdcawley@bofh.org.uk> said:

>> use FileHandle; autoflush STDOUT 1;

Piers> What on earth is wrong with
Piers>       $| = 1;
Piers> Loading an entire module to do something you can do
Piers> more efficiently simply by setting a variable seems
Piers> to be somewhat perverse.

Well, because...

You are assuming that STDOUT is the currently selected
filehandle when you set $| - this may not always be true and
thus $| isn't simply re-usable.

Using a module hides and abstracts the problem of
selecting/deselecting filehandles.

Let's be slightly more explicit:

    use FileHandle qw(autoflush);
    autoflush STDOUT 1;

-- 
Tony Curtis, Systems Manager, VCPC,      | Tel +43 1 310 93 96 - 12; Fax - 13
Liechtensteinstrasse 22, A-1090 Wien, AT | http://www.vcpc.univie.ac.at/

"Everything I am, I learned on the back of cereal boxes" ~ RJ, "Over the Hedge"


------------------------------

Date: Tue, 24 Mar 1998 07:49:17 -0600
From: jglopez@javercol.javeriana.edu.co
Subject: WEB Based E-mail Reader.
Message-Id: <6f8djv$tp9$1@nnrp1.dejanews.com>

Does anyone know were can I get an Email that let me read my mail by WEB, I
don't need special features, just read my POP account mail :).

Thank you for your information.

-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/   Now offering spam-free web-based newsreading


------------------------------

Date: Tue, 24 Mar 1998 09:03:53 -0500
From: Aaron R Kulkis <akulkis@be1151.pd3.ford.com>
Subject: Re: What does "UNIX" stand for..
Message-Id: <3517BD49.AEB@be1151.pd3.ford.com>

Rob Rodgers wrote:
> 
> Aaron R Kulkis <akulkis@be1151.pd3.ford.com> wrote:
> 
> Need Another Seven Astronauts.

I didn't write that!
Get your attributions right!

-- 
Aaron R. Kulkis
Unix Systems Administrator

---------------------------------------------------------------------------
I speak for me, not my employer
---------------------------------------------------------------------------
"What's wrong with 3rd party tools? Especially if they are free?
What the hell do you think unix is anyway? It's a big honkin' party
of 3rd party free tools." --Bob Cassidy (rmcassid@uci.edu)


------------------------------

Date: Tue, 24 Mar 1998 14:39:30 GMT
From: jgloudon@manitoba.bbn.com (Jason Gloudon)
Subject: Re: What's up with the debugger?
Message-Id: <slrn6hfhaf.dn5.jgloudon@manitoba.bbn.com>

Mark Schmick <mark@webz.com> wrote:
>It looks like I should extend the last question to a full-on bug
>report--I downgraded to 5.003 and the debugger buggery went away.
>Still .. any comments? Is this repeatable on platforms other than
>Linux?
>
>Perl 5.004_04
>Redhat Linux, 2.0.27

Hopefully you read the replies in your original post.
I'd not recommend going backwards.

-- 
Jason Gloudon


------------------------------

Date: Tue, 24 Mar 1998 05:38:42 -0800
From: jimschwartzson@usa.net
Subject: Re: Where to get Perl compiler for Win95 or Win NT?
Message-Id: <3517B762.925@usa.net>

Lennart Wong wrote:
> Can anyone tell
> me where I can get a FREE Perl compiler for Win95 or Win NT?

Well, I'm *sort* of answering your question. I purchased "Perl
5 Interactive Course" from Waite Press for $50 at a local book
store. Their web site is www.waite.com/ezone. This book comes
with a CD ROM which contains an interpreter (but not a
compiler) for Win32. I got it working fairly quickly on Win95.
By the way, the book has a black cover -- and is about 6
months old. The release I got was 5.003_07. It's 900 pages,
and the CD ROM is full of code examples.

Question to any NT/95 types listening who know about Unix. Is
there a straight forward way to get the Unix files (which don't
have CR/LF) from the CD ROM into a Windows Notepad?


------------------------------

Date: 24 Mar 1998 13:46:44 GMT
From: mike@stok.co.uk (Mike Stok)
Subject: Re: Where to get Perl compiler for Win95 or Win NT?
Message-Id: <6f8dg4$856@news-central.tiac.net>

In article <6f7f1n$42k@cobia.gulf.net>,
Lennart Wong <lenyywong@gulf.net> wrote:
>I am a newcomer of Perl.  Yet, all I have in hand is the "Learning Perl"
>book.  I want to get a compiler to try Perl out.  I have close-to-none
>experience with UNIX and have a PC with Win95 and Win NT.  Can anyone tell
>me where I can get a FREE Perl compiler for Win95 or Win NT?  Thank you very
>much!

The easiest way to find a perl interperter for your system is to visit
http://www.perl.com and follow the Get The Latest Verison Of Perl link.
On the page you arrive at there is a section headed Perl For Win32.

If you're learning perl on a Win32 system then it migth be worth looking
at theverion of Learning Perl described at
http://www.oreilly.com/catalog/lperlwin/

The perl interpreter is a load 'n' go compiler, there is work going on to
develop a more traditional compiler.

Hope this helps,

Mike
-- 
mike@stok.co.uk                    |           The "`Stok' disclaimers" apply.
http://www.stok.co.uk/~mike/       |   PGP fingerprint FE 56 4D 7D 42 1A 4A 9C
http://www.tiac.net/users/stok/    |                   65 F3 3F 1D 27 22 B7 41
stok@colltech.com                  |            Collective Technologies (work)


------------------------------

Date: Tue, 24 Mar 1998 14:02:21 +0000
From: Barfly <barfly@Karkamiel.COM>
Subject: Re: Where to get Perl compiler for Win95 or Win NT?
Message-Id: <3517BCED.6587@Karkamiel.COM>

www.perl.com
--
Barfly

Daddy, why doesn't this magnet pick up this floppy disk?


------------------------------

Date: Tue, 24 Mar 1998 14:34:27 GMT
From: jgloudon@manitoba.bbn.com (Jason Gloudon)
Subject: Re: Where to get Perl compiler for Win95 or Win NT?
Message-Id: <slrn6hfh10.dn5.jgloudon@manitoba.bbn.com>

Lennart Wong <lenyywong@gulf.net> wrote:
>I am a newcomer of Perl.  Yet, all I have in hand is the "Learning Perl"
>book.  I want to get a compiler to try Perl out.  I have close-to-none
>experience with UNIX and have a PC with Win95 and Win NT.  Can anyone tell
>me where I can get a FREE Perl compiler for Win95 or Win NT?  Thank you very
>much!

An official "compiler" for Perl has not been released for any platform.
Perl is normally -interpreted-. That's lesson 1. 

Since you were looking for perl why didn't you go to www.perl.com ?

http://www.perl.com/CPAN-local//ports/win95/.

-- 
Jason Gloudon


------------------------------

Date: Tue, 24 Mar 1998 08:27:09 -0800
From: "Mike Glenn" <mglenn@no.spam.zbzoom.net>
Subject: Re: Where to get Perl compiler for Win95 or Win NT?
Message-Id: <6f8gbn$h3u$1@news0-alterdial.uu.net>

>> Can anyone tell
>> me where I can get a FREE Perl compiler for Win95 or Win NT?


Go to http://www.perl.org/ under "Acquiring Perl Software" link.
Note: Perl is first and for most an interp'd language. There are compilers
for it but I'm not sure if you can get one for 95. But what you most likely
are look in for is the interpreter, which you can get at the above mentioned
link.

>Question to any NT/95 types listening who know about Unix. Is
>there a straight forward way to get the Unix files (which don't
>have CR/LF) from the CD ROM into a Windows Notepad?

Try using wordpad instead. Or if you do alot of CGI perl scripting try using
Homesite 3.0. Its really an HTML editor but it work great for perl as well.
Just remember to add escape characters to all the quotation marks in the
HTML tags.

Mike Glenn
mglenn@no.spam.zbzoom.net





------------------------------

Date: Tue, 24 Mar 1998 14:37:23 GMT
From: jgloudon@manitoba.bbn.com (Jason Gloudon)
Subject: Re: Where to get Perl compiler for Win95 or Win NT?
Message-Id: <slrn6hfh6g.dn5.jgloudon@manitoba.bbn.com>

jimschwartzson@usa.net <jimschwartzson@usa.net> wrote:
>Question to any NT/95 types listening who know about Unix. Is
>there a straight forward way to get the Unix files (which don't
>have CR/LF) from the CD ROM into a Windows Notepad?

Don't use notepad, use Wordpad.

-- 
Jason Gloudon


------------------------------

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 2171
**************************************

home help back first fref pref prev next nref lref last post