[11559] in Perl-Users-Digest
Perl-Users Digest, Issue: 5159 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Mar 17 17:17:27 1999
Date: Wed, 17 Mar 99 14:00:19 -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 Wed, 17 Mar 1999 Volume: 8 Number: 5159
Today's topics:
Appending Large Files <vince@oxxfordinfo.com>
Re: DUMB Newbie question <theglauber@my-dejanews.com>
Re: Input for PERL Course request <wredman@ycc.kodak.com>
Re: Input for PERL Course request (Tad McClellan)
Re: Linux vs. BSD Unix question (Todd Lehman)
Memory errors under purify. <gzou@quantdev.fi.fmrco.com>
Need a one liner... <safrit@mindspring.com>
Re: Need a one liner... <jeffp@crusoe.net>
Re: Need a one liner... <jeffp@crusoe.net>
Re: Need Faster Approach - Thanks! frogsmock@my-dejanews.com
Re: number convert (Tad McClellan)
Re: PerlScript locking up MS Access file (John Casey)
Public Key Encryption? (Alex Gottschalk)
Re: Real Funny Browser/CGI Behavior <droby@copyright.com>
Re: Regex limits for regex/function calls within subsit (Ilya Zakharevich)
rmdir fails Why? <support@counter.w-dt.com>
Re: rmdir fails Why? <jeffp@crusoe.net>
Re: rmdir fails Why? <support@counter.w-dt.com>
Re: rmdir fails Why? (Greg Andrews)
Re: rmdir fails Why? <support@counter.w-dt.com>
Re: rmdir fails Why? <upsetter@ziplink.net>
Server doesnt recognize my .pl files <mikej@1185design.com>
Re: Testing CGI scripts on a standalone (John Casey)
Re: The truth about the Pentium III chip and ID --- **b <Rufus_Smith@GuntherIntl.com>
Re: Very simple question (Tad McClellan)
Re: Which OS am I in <Allan@due.net>
Re: Which OS am I in (Tad McClellan)
Re: Which OS am I in <jeff@vpservices.com>
Special: Digest Administrivia (Last modified: 12 Dec 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Wed, 17 Mar 1999 20:09:15 GMT
From: "Vincent P. Mautone" <vince@oxxfordinfo.com>
Subject: Appending Large Files
Message-Id: <LZTH2.354$wm6.158567@client.news.psi.net>
Hi,
I wrote a perl script which is meant to append File A to File B. However,
once File B reaches 4.3GB(yes, gigabytes), the appends no longer work. We
have successfully read files larger than 4.3GB yet I do not know why I
cannot write-append to a file larger than 4.3GB. I am using ActiveState Perl
5.005_02 on NT Server 4.0 (SP4). I have included my script below
Thanks in advance for your help,
Vince
####Source Code follows
open(fpInput,$ARGV[0]) or die "Error: Unable to open $ARGV[0]\n";
$sOutput = ">>" . $ARGV[1];
open(fpOutput,$sOutput) or die "Error: Unable to open $ARGV[1]\n";
binmode fpInput;
binmode fpOutput;
# Grab 5MB at a time
while( read(fpInput,$line,5000000) )
{
print fpOutput uc($line);
}
------------------------------
Date: Wed, 17 Mar 1999 20:56:51 GMT
From: The Glauber <theglauber@my-dejanews.com>
Subject: Re: DUMB Newbie question
Message-Id: <7cp4ue$33k$1@nnrp1.dejanews.com>
In article <19990316164541.28798.00000152@ng104.aol.com>,
visualjp@aol.com (VisualJP) wrote:
> I am trying to start a perl script on a SGI (irix). It contains a loop that
> executes a program. The problem is that the perl script doesn't seem to wait
> until the program finishes, it just keeps going. The result is the same
> program opened several times at once.
You didn't say how you are running the program. If you are using "system",
then Perl should wait for the program to complete. Any chance you have a "&"
character at the end of your command? This could be interpreted as a request
to run it in the background.
Glauber
[...]
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: Wed, 17 Mar 1999 15:25:07 -0500
From: "William D. Redman" <wredman@ycc.kodak.com>
To: brian d foy <comdog@computerdog.com>
Subject: Re: Input for PERL Course request
Message-Id: <36F00FA3.E0520529@ycc.kodak.com>
--------------D701C99D17D138B2F3FF87E5
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
That was what I was wondering. According to www.marquette.edu. they do offer
CEU through Ezone. And marquette does appear to be a real entity (my
apologies to anyone attending and reading this!).
brian d foy wrote:
> In article <36EFFA13.F751C60E@ycc.kodak.com>, wredman@kodak.com posted:
>
> > Is there anyone with experience with the PERL Certification offered by
> > Ezone through Marquette University?
>
> i guess you can get anyone to certify anything. i wonder who accredited
> them to do that ;)
>
> --
> brian d foy
> CGI Meta FAQ <URL:http://www.smithrenaud.com/public/CGI_MetaFAQ.html>
--
===============================================================================
William D. Redman ph: (716) 726-6315
wredman@kodak.com Fx: (716) 726-0002
wdr3016@cs.rit.edu pgr: (97)-53850
Work Schedule : http://www.rit.edu/~wdr3016/worksch.html
http://www.ycc.kodak.com/~wredman/worksch.html
Eastman Kodak Company, 2-5-EP 901 Elmgrove Road, Rochester, NY ,14653-5401
Picture me saying these things, not Kodak.
No negative comments please
===============================================================================
--------------D701C99D17D138B2F3FF87E5
Content-Type: text/html; charset=us-ascii
Content-Transfer-Encoding: 7bit
<HTML>
That was what I was wondering. According to <A HREF="http://www.marquette.edu">www.marquette.edu.</A>
they do offer CEU through Ezone. And marquette does appear to be a real
entity (my apologies to anyone attending and reading this!).
<P>brian d foy wrote:
<BLOCKQUOTE TYPE=CITE>In article <36EFFA13.F751C60E@ycc.kodak.com>,
wredman@kodak.com posted:
<P>> Is there anyone with experience with the PERL Certification offered
by
<BR>> Ezone through Marquette University?
<P>i guess you can get anyone to certify anything. i wonder who accredited
<BR>them to do that ;)
<P>--
<BR>brian d foy
<BR>CGI Meta FAQ <URL:<A HREF="http://www.smithrenaud.com/public/CGI_MetaFAQ.html">http://www.smithrenaud.com/public/CGI_MetaFAQ.html</A>></BLOCKQUOTE>
<P>--
<BR>
<P>===============================================================================
<BR>William D. Redman ph: (716) 726-6315
<BR>wredman@kodak.com Fx: (716) 726-0002
<BR>wdr3016@cs.rit.edu
pgr: (97)-53850
<P>Work Schedule : <A HREF="http://www.rit.edu/~wdr3016/worksch.html">http://www.rit.edu/~wdr3016/worksch.html</A>
<BR>
<A HREF="http://www.ycc.kodak.com/~wredman/worksch.html">http://www.ycc.kodak.com/~wredman/worksch.html</A>
<P>Eastman Kodak Company, 2-5-EP 901 Elmgrove Road, Rochester, NY
,14653-5401
<P> Picture
me saying these things, not Kodak.
<BR>
No negative comments please
<P>===============================================================================
<BR> </HTML>
--------------D701C99D17D138B2F3FF87E5--
------------------------------
Date: Wed, 17 Mar 1999 09:04:58 -0500
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: Input for PERL Course request
Message-Id: <aqcoc7.no9.ln@magna.metronet.com>
William D. Redman (wredman@ycc.kodak.com) wrote:
: I am working on putting together an introduction class for scripting in
: awk and PERL. The focus is for students that have already completed an
: introductory sequence that includes Bash scripting. They already
: understand programming structures. This course is to be an offering in
: IT, and within the System Administration concentration. I am looking
: forward to putting together some fun labs with SA tasks.
If your students are to be sysadmins, then be sure to
work taint checking into the curriculum.
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: Wed, 17 Mar 1999 16:24:51 -0600
From: lehman@javanet.com (Todd Lehman)
Subject: Re: Linux vs. BSD Unix question
Message-Id: <MPG.1159e7b0e3861aa39896cd@news.javanet.com>
In comp.lang.perl.misc, hislop@pconline.com (Krys and Rog Hislop) writes:
> [...]
> The error message I get if I execute the above snippet from the BSD machine
> is "Terminated" or "Killed" -- that's all -- and it randomly occurs,
> sometimes after writing 34K to the new file, sometimes after 400K, but
> generally somewhere in between. I have plenty of disk space left, on the
> order of 12 MB, and I believe I am alloted a paltry 8 MB of RAM use, though
> this should not be an issue here as far as I can see.
>
> Can anyone offer any suggestions or insight so that I may make the necessary
> changes to my real program, allowing it to run successfully on the BSD
> server?
Do you have a shared account or do you own the whole server? What does
`limit cputime` say? It sounds like your processes are being killed by
the system for using too much CPU. (At least, that's what I've seen on
some BSD systems when I had shared accounts.)
--Todd
------------------------------
Date: 17 Mar 1999 16:08:52 -0500
From: George Zou <gzou@quantdev.fi.fmrco.com>
Subject: Memory errors under purify.
Message-Id: <sa4n21bsu1n.fsf@quantdev.fi.fmrco.com>
I'm tring to embed a perl inteprator in my program. Running under purify,
it generates a lot of memory access violation errors, and eventually crashes.
I tried the miniperl program that comes with perl distribution, it has the
same problem. However, running outside purify, everything seems to work
OK.
Anyone encountered this problem before?
George Zou
------------------------------
Date: Wed, 17 Mar 1999 16:32:42 -0500
From: John Safrit <safrit@mindspring.com>
Subject: Need a one liner...
Message-Id: <36F01F7A.59F397A7@mindspring.com>
I've been playing with several one-liners that do various tasks, like
convert DOS to UNIX text files, reverse lines in a file, etc., but came
up with one I cannot figure out.
Is there a one-liner that will discard all lines except those between
START and END tags? It is easy to discard everything between them:
perl -ne 'print unless /^START$/../^END$/' file.txt
But to keep all lines between seems impossible. Any ideas? It must not
include the tags themselves...
John Safrit
------------------------------
Date: Wed, 17 Mar 1999 16:45:34 -0500
From: evil Japh <jeffp@crusoe.net>
Subject: Re: Need a one liner...
Message-Id: <Pine.GSO.3.96.990317164308.9752A-100000@crusoe.crusoe.net>
> perl -ne 'print unless /^START$/../^END$/' file.txt
>
> But to keep all lines between seems impossible. Any ideas? It must not
> include the tags themselves...
Well, this works for me (except about that not printing the tags thing):
perl -ne 'print if /^START$/ .. /^END$/' file
As for NOT printing the tags, here's a little hack:
perl -ne 'print if s/^START\n$/ .. /^END\n$/' file
I think that does what you asked.
--
Jeff Pinyan (jeffp@crusoe.net)
www.crusoe.net/~jeffp
Crusoe Communications, Inc.
973-882-1022
www.crusoe.net
------------------------------
Date: Wed, 17 Mar 1999 16:46:19 -0500
From: evil Japh <jeffp@crusoe.net>
Subject: Re: Need a one liner...
Message-Id: <Pine.GSO.3.96.990317164545.9752B-100000@crusoe.crusoe.net>
There was an error in my previous post.
perl -ne 'print if s/^START\n$/ .. s/^END\n$/' testfile
SHOULD have been:
perl -ne 'print if s/^START\n$// .. s/^END\n$//' testfile
--
Jeff Pinyan (jeffp@crusoe.net)
www.crusoe.net/~jeffp
Crusoe Communications, Inc.
973-882-1022
www.crusoe.net
------------------------------
Date: Wed, 17 Mar 1999 21:51:20 GMT
From: frogsmock@my-dejanews.com
Subject: Re: Need Faster Approach - Thanks!
Message-Id: <7cp84j$61v$1@nnrp1.dejanews.com>
Thanks!
All the replies I received were very helpful (once again dispelling the
"clp.misc is harsh" rumors I keep hearing). Using a simple array slice
instead of splice is indeed faster, and I don't know how I overlooked the
third 'split' argument. Unfortunately I have not had a spare moment to
benchmark the "find the 75,000 comma and split the rest" approach, but will
post the results when I can.
As for why I'm storing the data this way, using DB_File I've built a search
index where the hash keys are search words, and the hash values are
comma-delimited lists of SQL database IDs in which those words appear, like
so:
foo => id1,id9,id43,id765,...
bar => id3,id4,id99,...
So a search for "foo" returns all the SQL DB IDs in which "foo" appears, and
depending on which "page" of search results I want determines which SQL DB
IDs I use to pull data from the SQL DB. This has worked out very well for me
in general, as it allows speedy searching for words that appear in the middle
of SQL DB text fields (because the SQL "where my_field like '%foo' seems
godawful slow). But my concern was how it would scale w/ a long value list,
hence my original question.
Anyway, more info than you probably wanted, but thought I'd share.
Thanks again!
Jim
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: Wed, 17 Mar 1999 09:07:02 -0500
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: number convert
Message-Id: <6ucoc7.no9.ln@magna.metronet.com>
Cplee (cplee@bigfoot.com) wrote:
: I would like to convert $numbe=123.345 to $dollars=123.35
: what is the command I can use
$dollars=123.35;
Perhaps you meant to ask some other question?
Like "How can I round to two decimal places?" ??
Perl FAQ, part 4:
"Does perl have a round function?
What about ceil() and floor()? Trig functions?"
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: Wed, 17 Mar 1999 20:07:40 GMT
From: jcasey@workingventures.ca (John Casey)
Subject: Re: PerlScript locking up MS Access file
Message-Id: <36f00965.101746133@wv-proxy>
Have you tried WIN32::ODBC. I am a beginner Perl programmer and have
had great success with MS-Access using WIN32::ODBC. You may also want
to look at your Access database file sharing properties. During my CGI
course we used ISQL which I imagine is like mySQL. I didn't like them.
WIN32 and ODBC are industry standard and less cryptic. If you are
doing this for fun, then use whatever you want. If you are doing this
for employment experience then stick with industry standards. I know
it sucks, but might as well get used to it, and make it work.
Cheers ;o)
John Casey
Applications Support Specialist
Working Ventures Canadian Fund Inc.
On Wed, 10 Mar 1999 22:46:00 GMT, bcs_webnet@my-dejanews.com wrote:
>I would love to have one of those products but don't have the money for even a
>single license right now, I may try the NT version of MySql, as it is fairly
>inexpensive, or scavenge and set up a Linux box.
>Brian
>
>In article <36DE18F8.C1D09059@his.com>,
> Chris Morrow <morrowc@his.com> wrote:
>> Can I suggest you get a real database?
>>
>> Access is NOT the right solution for a Web database, it's not really
>> good at multiple simultaneous access.
>>
>> Try SQL Server? or Oracle?
>>
>> (The behaviour you are describing is quite common on Windows
>> systems...as a whole, unfortunately)
>>
>> -Chris
>>
>> brian_smith@sonat.com wrote:
>> >
>> > My PerlScript/ASP pages seem to lock onto my MS Access file with the very
>> > first page access, and I cannot replace/edit the file without killing the
>> > process where the PerlScript dll has a lock on it, sometime even have to
>> > restart web service.
>> >
>> > I make sure to destroy my connection and resultset objects.
>> >
>> > Please help.
>> > brian
>> >
>> > -----------== Posted via Deja News, The Discussion Network ==----------
>> > http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
>>
>
>-----------== Posted via Deja News, The Discussion Network ==----------
>http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: Wed, 17 Mar 1999 21:30:23 GMT
From: alex@cs.cornell.edu----NOSPAM (Alex Gottschalk)
Subject: Public Key Encryption?
Message-Id: <7cp6th$6gu@newsstand.cit.cornell.edu>
Hi All,
I'm writing a CGI that needs to write data encrypted using a public/private
key scheme such as PGP. Does anyone know of a module that supports this?
I'll be running this on <wince> MS IIS 4.0, so saying `pgp -e datafile key`
isn't an option.
Thanks,
Alex
---------------\_/------------------\_/-------------------------------
Alex Gottschalk | algae@netspace.org | http://www.netspace.org/~algae/
finger://algae@netspace.org for PGP public key and geek code.
"Tech support is a lot like CPR. If you're not breaking ribs,
you're not doing it right." --Me
------------------------------
Date: Wed, 17 Mar 1999 20:52:16 GMT
From: Don Roby <droby@copyright.com>
Subject: Re: Real Funny Browser/CGI Behavior
Message-Id: <7cp4ls$2ur$1@nnrp1.dejanews.com>
In article <7cn2ng$c8v$1@nnrp1.dejanews.com>,
tatabu@my-dejanews.com wrote:
> Brian,
>
> Is that supposed to be your help? How do we use this line
> of code in a CGI file? I want the CGI program to write the image's
> dimensions in the HTML file.
> Thanks!
>
His help was the statement that he needs more information to help. You don't
seem to have supplied any further information in this post, so I guess you
must have an error on line 17.
> @@-->>> Soulis
> friends@soulis.com
>
> In article <comdog-ya02408000R1603991433140001@news.panix.com>,
> comdog@computerdog.com (brian d foy) wrote:
> > In article <7clt5n$8uh$1@nnrp1.dejanews.com>, tatabu@my-dejanews.com posted:
> >
> > > I am trying to use the line of code
> > >
> > > $sizes=imgsize("friend.jpg");
> > >
> > > in a CGI script file. When I call that cgi file with any one of the
> > > three browsers (Netscape, MSIE, Opera), I get an error.
> >
This is interesting. In an almost identical question, you claimed to have the
script working for Netscape and Opera, but not MSIE. Which is it?
Browsing through all your attempts to communicate useful information to us
about this problem, I have concluded the following. It may be wrong, since
your various posts seem to sometimes contradict one another, and are at any
rate quite unclear.
You seem to be attempting to write a CGI program in Perl that produces HTML
with embedded Javascript that deals with the size of an image.
This Perl program may or may not produce a result that works with some
browsers and fails with others (this varies between your messages).
My diagnoses:
(1) Cross-platform Javascript incompatibilities are causing you major
problems. (2) You're trying to learn too many intermixed technologies at once
and confusing yourself.
There are plenty of versions of Javascript with different syntaxes and
different object models. To write JavaScript that works for all versions of
all browsers allegedly supporting Javascript is pretty near impossible.
Writing a CGI script in Perl that produces Javascript embedded in HTML is
almost like speaking four languages at once. If you're just learning the
stuff, it's much harder to learn four at once and use them together. You
should try to start with some smaller steps.
--
Don Roby
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: 17 Mar 1999 20:17:52 GMT
From: ilya@math.ohio-state.edu (Ilya Zakharevich)
Subject: Re: Regex limits for regex/function calls within subsitutions?
Message-Id: <7cp2lg$dk5$1@mathserv.mps.ohio-state.edu>
[A complimentary Cc of this posting was sent to Sami Rosenblad
<blade@leela.janton.fi>],
who wrote in article <blade-1703990922370001@durandal.janton.fi>:
> > but this is only a heuristic, and it is always possible to create a
> > REx which would blow things away:
> >
> > > perl -we '$_ = "a" x 1e6; /(a?a?a?){12345}/'
> > Segmentation fault (core dumped)
>
> # perl -we '$_ = "a" x 1e6; /(a?a?a?){12345}/'
> (a?a?a?){12345} matches null string many times at -e line 1.
> This is perl, version 5.004_04 built for i386-linux
The bug you see is fixed a long time ago. Upgrade.
Ilya
------------------------------
Date: Wed, 17 Mar 1999 15:13:09 -0600
From: Mike <support@counter.w-dt.com>
Subject: rmdir fails Why?
Message-Id: <36F01AE4.4FDCA6C1@counter.w-dt.com>
How come this doesn't work to delete my directory? The directory is
empty but it still fails. Does it have to be chmodded to something
special, I have tried 777, 755, 666, none have worked. It doesn't give
an error in the server log either. What else could cause it to fail?
rmdir("$ads_dir/$INPUT{'accountnumber'}");
$dir = "$ads_dir/$INPUT{'accountnumber'}/";
if (-e $dir) {
$errormessage = "Failed to delete $INPUT{'accountnumber'}!";
&error; }
------------------------------
Date: Wed, 17 Mar 1999 16:21:50 -0500
From: evil Japh <jeffp@crusoe.net>
Subject: Re: rmdir fails Why?
Message-Id: <Pine.GSO.3.96.990317162031.28812c-100000@crusoe.crusoe.net>
> rmdir("$ads_dir/$INPUT{'accountnumber'}");
Hmmm... rmdir() is the sort of function that should be followed by a check
of the $! variable...
Try:
rmdir "$ads_dir/$INPUT{'accountnumber'}" or
die "can't rmdir $ads_dir/$INPUT{'accountnumber'}: $!"
--
Jeff Pinyan (jeffp@crusoe.net)
www.crusoe.net/~jeffp
Crusoe Communications, Inc.
973-882-1022
www.crusoe.net
------------------------------
Date: Wed, 17 Mar 1999 15:32:14 -0600
From: Mike <support@counter.w-dt.com>
Subject: Re: rmdir fails Why?
Message-Id: <36F01F5D.2E7E2D78@counter.w-dt.com>
I tried that but it doesn't die and the directory is still there.
evil Japh wrote:
> > rmdir("$ads_dir/$INPUT{'accountnumber'}");
>
> Hmmm... rmdir() is the sort of function that should be followed by a check
> of the $! variable...
>
> Try:
> rmdir "$ads_dir/$INPUT{'accountnumber'}" or
> die "can't rmdir $ads_dir/$INPUT{'accountnumber'}: $!"
>
> --
> Jeff Pinyan (jeffp@crusoe.net)
> www.crusoe.net/~jeffp
>
> Crusoe Communications, Inc.
> 973-882-1022
> www.crusoe.net
------------------------------
Date: 17 Mar 1999 13:35:41 -0800
From: gerg@shell1.ncal.verio.com (Greg Andrews)
Subject: Re: rmdir fails Why?
Message-Id: <7cp77d$1t4$1@shell1.ncal.verio.com>
Mike <support@counter.w-dt.com> writes:
>
>I tried that but it doesn't die and the directory is still there.
>
What did the error message tell you?
BTW, rmdir won't delete it if it's not a directory.
-Greg
------------------------------
Date: Wed, 17 Mar 1999 15:41:12 -0600
From: Mike <support@counter.w-dt.com>
Subject: Re: rmdir fails Why?
Message-Id: <36F02177.BDC64962@counter.w-dt.com>
Whats that mean? can't delete: Invalid argument
this is the line its suppose to be on.
rmdir "$ads_dir/$INPUT{'accountnumber'}/ads/" or die "can't delete: $!";
evil Japh wrote:
> > rmdir("$ads_dir/$INPUT{'accountnumber'}");
>
> Hmmm... rmdir() is the sort of function that should be followed by a check
> of the $! variable...
>
> Try:
> rmdir "$ads_dir/$INPUT{'accountnumber'}" or
> die "can't rmdir $ads_dir/$INPUT{'accountnumber'}: $!"
>
> --
> Jeff Pinyan (jeffp@crusoe.net)
> www.crusoe.net/~jeffp
>
> Crusoe Communications, Inc.
> 973-882-1022
> www.crusoe.net
------------------------------
Date: Wed, 17 Mar 1999 21:51:41 GMT
From: Scratchie <upsetter@ziplink.net>
Subject: Re: rmdir fails Why?
Message-Id: <NtVH2.245$no1.39407@news.shore.net>
Mike <support@counter.w-dt.com> wrote:
: Whats that mean? can't delete: Invalid argument
: this is the line its suppose to be on.
: rmdir "$ads_dir/$INPUT{'accountnumber'}/ads/" or die "can't delete: $!";
You may need to remove the final '/' from your argument.
--Art
--
--------------------------------------------------------------------------
National Ska & Reggae Calendar
http://www.agitators.com/calendar/
--------------------------------------------------------------------------
------------------------------
Date: Wed, 17 Mar 1999 12:17:18 -0800
From: mikej <mikej@1185design.com>
Subject: Server doesnt recognize my .pl files
Message-Id: <36F00DCD.3500D97C@1185design.com>
Hey all,
I recently reinstalled Perl on our Sun SPARC server and when I try a
simple script from the shell that prints a line, it will work. However
when I go to one of our perl scripts through a web browser, it
interprets it as a plain text file and doesnt even attempt to send it to
the Perl interpreter. It just shows my perl script like it was a .txt
file. Also all my forms when I submit them it says:
The requested method POST is not allowed for the URL (url to my .pl file
would be here)
This most likely has to do with some small, inconspicous server setting
somewhere, but I have no clue how to fix it to recognize my perl
scripts. If anyone knows, please help!
Thanks.
-mike
------------------------------
Date: Wed, 17 Mar 1999 20:16:56 GMT
From: jcasey@workingventures.ca (John Casey)
Subject: Re: Testing CGI scripts on a standalone
Message-Id: <36f00c66.102515890@wv-proxy>
Ahhhhhhh...now maybe I can get some answers. I am a beginner as well.
I have OMNIHTTPd and Perl 5.004 installed. I have tried using reliable
code to return the HTTP_REFERER variable and it just does not work.
Have you noticed this as well? The reason I asked you is you are also
running OMNIHTTPd and I believe that is the culprit.
Cheers ;o)
John Casey
Applications Support Specialist
Working Ventures Canadian Fund Inc.
On Tue, 16 Mar 1999 07:13:54 +0000, Doc <Doc@goforit.demon.co.uk>
wrote:
>In article <RSt6zBALNl62EwCc@goforit.demon.co.uk>, Doc
><Doc@goforit.demon.co.uk> writes
>>Hi
>>I am new to CGI scripting and am writing a script to produce web pages
>>from a database - no problem there. But, I would like to be able to
>>test the programme on my PC rather than have to use my provider's
>>server! I know that I can run my programme via the command prompt but
>>obviously that does not include the browser. How can I run it and see
>>the results? (Yes I have run simple programmes from the browser but as
>>soon as I include calculations and non-HTML stuff it gets printed on the
>>screen and no calcs are done - i.e. it is not run as a porper programme)
>>
>>Thanks in anticipation
>>
>>doc
>A response to my own atricle and a solution! I have installed a
>freeware version of OmniHTTPD(v1.01)
>(see www.micro.demon.co.uk/dbase.htm). This sets up a server on my PC
>for local use. I can now run my CGI scripts on a browser without
>connecting to the net while developing.
> I then downloaded Microsoft's SQL server driver. I set up a system
>DSN with the SQL type and a user DSN with Access(mdb) type. All works
>easily, for once! One word of warning - make sure that you have used
>the DOS prompt (and dropped it to the bottom of the screen if you wish)
>before running your programme - is this because of compiling???).
>
>Thanks to those who offered help.
>Doc
>--
>Doc
------------------------------
Date: Wed, 17 Mar 1999 15:48:55 -0500
From: "Rufus V. Smith" <Rufus_Smith@GuntherIntl.com>
Subject: Re: The truth about the Pentium III chip and ID --- **boycott info**
Message-Id: <7cp4jc$2b6$1@nnrp02.primenet.com>
All that is needed to get to the dial up user is an address of the service
provider's modem that the user called in on!
This is obviously not unique to an individual.
The IP address he gets when he logs in is also out of a pool of addresses
and is also non-unique.
Michael Barnes wrote in message <36efc6e7.0@news.webaccess.net>...
>Every MODEM has a MAC address also...so your friends pc is nicless, but not
>macless
>As far as I know you cannot network anywhere without a mac address since
>IP's map directly to machine addresses at lower levels to identify your
>particular machine on any network. So, if your connected to any network
via
>any hardware device (router, switch, modem, nic) those devices must have
mac
>addresses.
>
>and modems are easy to replace compared to CPU's also...
>
>
>
------------------------------
Date: Wed, 17 Mar 1999 09:02:10 -0500
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: Very simple question
Message-Id: <2lcoc7.no9.ln@magna.metronet.com>
Barry (santobro@gis.net) wrote:
: this line reads a file into my perl script.
: open(FILE,"file.txt") || die;
That line reads nothing into your perl script.
It just establishes a named I/O connection, called a filehandle.
: how do I read the file if its in a different directory? Lets say the one
: above it.
: open(FILE,"/file.txt") || die; this doesn't work.
That isn't the one above it.
That is a file "at the top" of the directory structure.
: open(FILE,"..file.txt") || die; this doesnt work either.
: please help.
open(FILE,'../file.txt') || die "could not open '../file.txt' $!";
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: Wed, 17 Mar 1999 15:11:39 -0500
From: "Allan M. Due" <Allan@due.net>
Subject: Re: Which OS am I in
Message-Id: <7cp1sv$e8k$1@samsara0.mindspring.com>
Spike White wrote in message <7cov27$mj4$1@obsidian.us.dell.com>...
:# perldoc -q 'which operating system'
:Unknown option: q
:perldoc [options] PageName|ModuleName|ProgramName...
:perldoc [options] -f BuiltinFunction
:...
You should probably have supplied a version number in that post. For
5.005_02.
perldoc [options] PageName|ModuleName|ProgramName...
perldoc [options] -f BuiltinFunction
perldoc [options] -q FAQRegex
time to upgrade?
:Now back to the question -- how can a perl program tell whether
:it is running under UNIX or something else?
perlfaq8.pod
How do I find out which operating system I'm running under?
The $^O variable ($OSNAME if you use English) contains
the operating system that your perl binary was built
for.
HTH
AmD
--
$email{'Allan M. Due'} = ' All@n.Due.net ';
--random quote --
If the automobile had followed the same development cycle as the computer, a
Rolls-Royce would today cost $100, get one million miles to the gallon, and
explode once a year, killing everyone inside.
- Robert X Cringely
------------------------------
Date: Wed, 17 Mar 1999 09:17:43 -0500
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: Which OS am I in
Message-Id: <7idoc7.7q9.ln@magna.metronet.com>
Spike White (spike_YYwhiteYY@YYdellYY.com) wrote:
: # perldoc -q 'which operating system'
: Unknown option: q
: perldoc [options] PageName|ModuleName|ProgramName...
: perldoc [options] -f BuiltinFunction
: ....
You have an old version of Perl.
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: Wed, 17 Mar 1999 12:09:55 -0800
From: Jeff Zucker <jeff@vpservices.com>
Subject: Re: Which OS am I in
Message-Id: <36F00C13.83347E83@vpservices.com>
Spike White wrote:
>
> # perldoc -q 'which operating system'
> Unknown option: q
> perldoc [options] PageName|ModuleName|ProgramName...
> perldoc [options] -f BuiltinFunction
Might want to check your perl install, Spike, both the installs I run
(5.00404 on Solaris and 5.00502 on win95) tell me exactly what I want to
know with perldoc -q.
--
jeff
------------------------------
Date: 12 Dec 98 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Special: Digest Administrivia (Last modified: 12 Dec 98)
Message-Id: <null>
Administrivia:
Well, after 6 months, here's the answer to the quiz: what do we do about
comp.lang.perl.moderated. Answer: nothing.
]From: Russ Allbery <rra@stanford.edu>
]Date: 21 Sep 1998 19:53:43 -0700
]Subject: comp.lang.perl.moderated available via e-mail
]
]It is possible to subscribe to comp.lang.perl.moderated as a mailing list.
]To do so, send mail to majordomo@eyrie.org with "subscribe clpm" in the
]body. Majordomo will then send you instructions on how to confirm your
]subscription. This is provided as a general service for those people who
]cannot receive the newsgroup for whatever reason or who just prefer to
]receive messages via e-mail.
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 5159
**************************************
