[10651] in Perl-Users-Digest

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

Perl-Users Digest, Issue: 4243 Volume: 8

daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue Nov 17 22:07:14 1998

Date: Tue, 17 Nov 98 19:00:20 -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, 17 Nov 1998     Volume: 8 Number: 4243

Today's topics:
        "diff camel pod"? (better: comm -13 camel pod)? (David Combs)
        500 server error (Neil Prater)
    Re: 500 server error <rootbeer@teleport.com>
    Re: 500 server error <jtjohnston@erase.courrier.usherb.ca>
        Access Win16 DLLs from Perl? andrey.abramov@centigram.com
    Re: Check system NT/Unix <palincss@tidalwave.net>
    Re: COBOL to PERL translator <uri@sysarch.com>
    Re: File downloading (Daniel Pray)
    Re: How do I suppress this warning? <rootbeer@teleport.com>
    Re: How do i trim a string in Perl?? (Larry Rosler)
    Re: how to get `date` in perl for win32 (newbie) (Bill Hogsett)
    Re: newbie question (Craig Berry)
        NT security + IIS + perl <jburley@uci.edu.NOSPAM>
    Re: NT security + IIS + perl <rootbeer@teleport.com>
    Re: Perl scripts as a NT service ()
    Re: Perl Usage Survey - interpretations, anyone? (Adam Turoff)
    Re: Perl Usage Survey - interpretations, anyone? (David Formosa)
    Re: Perl Usage Survey - interpretations, anyone? <uri@fastengines.com>
    Re: Perl Usage Survey - interpretations, anyone? (Adam Turoff)
    Re: Perl Usage Survey - interpretations, anyone? <uri@sysarch.com>
    Re: Perl Usage Survey - interpretations, anyone? (Adam Turoff)
    Re: Perl5 <rootbeer@teleport.com>
    Re: Raw Sockets ecki@lina.inka.de
        Smarter Web Mailer <jtjohnston@courrier.usherb.ca>
        Substitution Grief <jtjohnston@erase.courrier.usherb.ca>
    Re: User ID problem <rootbeer@teleport.com>
        Win32 executing a .pl or .cgi <rambler@bloomington.in.us>
    Re: Win32 executing a .pl or .cgi <due@murray.fordham.edu>
    Re: Working with *in and mkdir() <rootbeer@teleport.com>
        Special: Digest Administrivia (Last modified: 12 Mar 98 (Perl-Users-Digest Admin)

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

Date: Wed, 18 Nov 1998 00:40:11 GMT
From: dkcombs@netcom.com (David Combs)
Subject: "diff camel pod"? (better: comm -13 camel pod)?
Message-Id: <dkcombsF2LDuz.I46@netcom.com>


The pod is of course newer than the blue camel.

And, lots of overlap between them; same words even, it seems,
sometimes.

Of course, it's a lot easier to read the camel, being
nicely bound, and all the discussion, etc.

After reading the camel, it would sure be a pain to go
have to read ALL the pod too!

---

So, is there any list of the PARTS of the pod that are NOT
covered (identically?  as well as?) by the camel.

For it would be VERY NICE INDEED to know what PARTS of the
pod that were "required" reading -- surely for things NEWER
than are in the camel, plus things that are discussed just
plain differently (maybe even better?)

Thanks!



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

Date: Tue, 17 Nov 1998 17:23:11 -0800
From: neil.prater@ype.gmpt.gmeds.com (Neil Prater)
Subject: 500 server error
Message-Id: <cmp42.955$06.1230642@WReNphoon2>

I am writing an html page that posts data by calling a perl script. When I
click on the submit button on the HTML page,
it calls the perl script and produces my output to a file. All is fine and
well, but I receive this error in my browser window.
Can anyone give me a hint at what I need to be looking at in my perl script
that is causing this problem?

500 Server Error

The server encountered an internal error or misconfiguration and was unable
to complete your request.

Please contact the server administrator, neil.prater@ype.gmpt.gmeds.com and
inform them of the time the error occurred ,
and anything you might have done that may have caused the error.

Error: httpd: malformed header from script



   -**** Posted from Supernews, Discussions Start Here(tm) ****-
http://www.supernews.com/ - Host to the the World's Discussions & Usenet


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

Date: Wed, 18 Nov 1998 01:41:34 GMT
From: Tom Phoenix <rootbeer@teleport.com>
Subject: Re: 500 server error
Message-Id: <Pine.GSO.4.02A.9811171741120.27321-100000@user2.teleport.com>

On Tue, 17 Nov 1998, Neil Prater wrote:

> Subject: 500 server error

When you're having trouble with a CGI program in Perl, you should first
look at the please-don't-be-offended-by-the-name Idiot's Guide to solving
such problems. It's available on CPAN.

   http://www.perl.com/CPAN/
   http://www.perl.org/CPAN/
   http://www.perl.org/CPAN/doc/FAQs/cgi/idiots-guide.html
   http://www.perl.org/CPAN/doc/manual/html/pod/

Hope this helps!

-- 
Tom Phoenix       Perl Training and Hacking       Esperanto
Randal Schwartz Case:     http://www.rahul.net/jeffrey/ovs/



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

Date: Tue, 17 Nov 1998 21:44:06 -0500
From: JTJ <jtjohnston@erase.courrier.usherb.ca>
Subject: Re: 500 server error
Message-Id: <36523476.4AA6@erase.courrier.usherb.ca>

Error: httpd: malformed header from script

Typical error - some typo someplace ...

You'll get used to it.

Can you access your site by telnet? Go to your directory.

cd /home01/yourname/cgi-bin/directory

type:

	perl -c file.pl
or
	perl -c file.cgi

if not try:

	perl -w file.pl
	perl -w file.cgi

These will run your perl debugger.


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

Date: Wed, 18 Nov 1998 00:03:08 GMT
From: andrey.abramov@centigram.com
Subject: Access Win16 DLLs from Perl?
Message-Id: <72t2ri$o1h$1@nnrp1.dejanews.com>

How do I access Win16 DLLs from Perl (on Win'95 or WinNT platform)  ?
Many thanks in advance....

Andrey

-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/       Search, Read, Discuss, or Start Your Own    


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

Date: Tue, 17 Nov 1998 14:29:30 -0500
From: Steve Palincsar <palincss@tidalwave.net>
Subject: Re: Check system NT/Unix
Message-Id: <3651CE9A.9B185720@tidalwave.net>

>From perlvar:

 $^O           The name of the operating system under which this
               copy of Perl was built, as determined during the
               configuration process.  The value is identical to
               $Config{'osname'}.  

Atle Raestad wrote:
> 
> I have a perl script that I use both on unix and NT. How can I check if
> the script is running on unix or NT? (Right now I'm using an argument
> -dos/-nt to specify when I run on NT, se that all path references
> becomes correct).
> 
> Regards Atle


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

Date: 17 Nov 1998 20:47:40 -0500
From: Uri Guttman <uri@sysarch.com>
Subject: Re: COBOL to PERL translator
Message-Id: <x7iugd4vr7.fsf@sysarch.com>

>>>>> "UG" == Uri Guttman <uri@sysarch.com> writes:

>>>>> "OM" == Oliver Muthig <oliver.muthig@ubs.com> writes:

  OM> is there anything like a COBOL to PERL translator ?

  UG> no, but i have threatened people with applying my perl to cobol
  UG> translator on their code!

  UG> :-)

after posting this joke complete with smiley i got this email:

  OM> Hi,
  OM> I'm very interested in your cobol to perl translator too.
  OM> Where can I get it ?
  OM> Thanks for your help.
  OM> Oliver

oliver, i wrote "perl to cobol". and it was a JOKE! i have used that
threat as a JOKE many times before. you are the first to read it
backwards and seriously. you must be looking at too much cobol for you
have lost your sense of humor. :-) (oliver, that is a smiley which means
humorous or silly or whatever).

disbelieving,

uri

-- 
Uri Guttman  -----------------  SYStems ARCHitecture and Software Engineering
Perl Hacker for Hire  ----------------------  Perl, Internet, UNIX Consulting
uri@sysarch.com  ------------------------------------  http://www.sysarch.com
The Best Search Engine on the Net -------------  http://www.northernlight.com


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

Date: Wed, 18 Nov 1998 00:24:39 GMT
From: daniel@intecomp.com (Daniel Pray)
Subject: Re: File downloading
Message-Id: <daniel-1711981626480001@usr18-dialup9.mix1.sacramento.cw.net>

TIA,

Yes there is a way.  This is used in conjunction with cgilib.pl. Here is
what I have done.  Your form would have pull-down or radio button named
"prod" or whatever with values like "aapmac".  That's about it.

I hope that helped.

Daniel

sub download
{
if($cgiDict{"prog"} eq "aapmac")
{
    my $name  = "http://www.yourdomain.com/dir/yourfilename.sea.bin";
    open(FILE, $name or die "Error");
    print "Content-Type: application/x-stuffit\n";
    print "Location: $name\n\n";
}


In article <3651B6BC.C9D17FFF@accessv.com>, Ken Tang <ktlb@accessv.com> wrote:

> Hi,
> 
> I'm trying to set up a secure file download site using Perl.
> I can set up a form which will have links to download each file,
> and have the files fed via a small perl program.  However the 
> filename sent to the browser for saving the file to be downloaded
> becomes the name of the script instead of the name of the file.
> 
> Is there a way around this without revealing the URL of the actual file?
> 
> TIA.
> 
> K.T.

-- 
dSoft Inc.  http://intecomp.com/dsoft/
Software Developer and FMP and 4D Developer

intecomp.com http://intecomp.com/
Computers and Peripherals


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

Date: Wed, 18 Nov 1998 00:29:30 GMT
From: Tom Phoenix <rootbeer@teleport.com>
Subject: Re: How do I suppress this warning?
Message-Id: <Pine.GSO.4.02A.9811171626490.27321-100000@user2.teleport.com>

On Tue, 17 Nov 1998, yong wrote:

> I don't know why $^W=0 won't suppress this warning: Name "main::SAVEERR"
> used only once: possible typo at myscript.pl line 4. 

Because it's a compile-time warning, and you're setting $^W at run-time.
But see that warning's entry in the perldiag manpage to see a suggestion
about how to suppress it.

> In fact, a trivial script:
> #!perl -w
> $a=3;
> does not give "used only once" warning. 

That's because perl doesn't warn about using its own variables; $a and $b
are used by perl itself. Hope this helps!

-- 
Tom Phoenix       Perl Training and Hacking       Esperanto
Randal Schwartz Case:     http://www.rahul.net/jeffrey/ovs/




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

Date: Tue, 17 Nov 1998 17:54:57 -0800
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: How do i trim a string in Perl??
Message-Id: <MPG.10bbc8c9ae368752989879@nntp.hpl.hp.com>

[Posted to comp.lang.perl.misc and a copy mailed.]

In article <8g3t27.er7.ln@flash.net> on Tue, 17 Nov 1998 18:14:00 -0600, 
Tad McClellan <tadmc@flash.net> says...
> Larry Rosler (lr@hpl.hp.com) wrote:
 ...
> : > a) s/^\b+//; s/\b+$//;
> : > b) s/^\b*(.*)\b*/$1/;
> 
> : That gets rid of backspaces only, not what was requested.  
> 
>    Oh boy! Finally I get a chance to turn the tables on Larry.
>    I'm still behind about 9:1 though...  ;-(

But catching up fast.

>    That gets rid of zero or more zero width assertions, not backspaces.
>    That is, it gets rid of nothing.

My braino.  F***ing context-dependent escape sequences.  Only in Perl...

Backspace ("\b") is matched by /\cH/ or by /\x08/ or by /\10/ (except if 
there are more than 9 captures!) or by /\010/ or by /[\b]/, but not by 
/\b/.  And I can't count how many times I've used /\b/ correctly as 
'word-boundary'.  D'uh.  I'll add that to my 'gotme' list.

-- 
(Just Another Larry) Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com


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

Date: Wed, 18 Nov 1998 01:30:58 GMT
From: bhogsett@apk.net (Bill Hogsett)
Subject: Re: how to get `date` in perl for win32 (newbie)
Message-Id: <2tp42.2625$ZP5.5909485@nntp0.detroit.mi.ameritech.net>

I have a question about strftime formatting.  I want to format the date as 
"Month Day, Year" with days 1 through 9 shown as single digits.  Is there a 
way to do it strftime?

Here is a test program:

# Uses Posix module!
use POSIX qw(strftime);
$testdate = 841851694;
$day = strftime "%B %d, %Y", localtime($testdate);
print "$day\n";

$day =~ s/0(\d,)/$1/;
print "$day\n";

This prints:

September 04, 1996
September 4, 1996

I can't see any additional formatting that works with strftime.  For example:

$today = strftime "%B %-d, %Y", localtime($testdate);

does not surpress the leading zero in the day.

Any suggestions?

Bill Hogsett



In article <365187F6.A70D5EBB@houston.Geco-Prakla.slb.com>, Dave Barnett 
<barnett@houston.Geco-Prakla.slb.com> wrote:
>[courtesy cc to cited author]
>
>j9feng@my-dejanews.com wrote:
>> 
>> The following codes work fine under linux,
>> 
>> my $date=`date`;
>Look up the localtime function (perldoc -f localtime).
>
>
>my @date = localtime;
>$date = sprintf("%02d/%02d/%02d", $date[4]+1, $date[3],
>($date[5]+1900)%100);
>print $date, "\n";
>
>
>Works fine for me on my solaris2.5.1 machine.  Should work fine on PoB
>machines, too.
>
>> 
>> but it will not work under win95, because the command 'date' under
>> win95 will print the current date and then ask for "Enter new
>> date(MM/DD/YY): " expecting you input new date or just hit ENTER.
>> 
>> Is there a way to get the current date?
>See above.
>
>> 
>> thanks in advance
>> 
>> -----------== Posted via Deja News, The Discussion Network ==----------
>> http://www.dejanews.com/       Search, Read, Discuss, or Start Your Own
>Cheers,
>Dave
>


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

Date: 18 Nov 1998 00:25:42 GMT
From: cberry@cinenet.net (Craig Berry)
Subject: Re: newbie question
Message-Id: <72t466$eht$1@marina.cinenet.net>

email@address.com wrote:
: I have a scalar $string, and I want to say something like this:
: 
: if (string has only letters and no other characters) {
:  <code>
: else {
:  <code>
: }
: 
: I know there probably is a very elegant way of doing this test with
: only one expression, rather than with two tests. Any help?

  if ($string !~ /[^A-Za-z]/) {
    # Contains only letters (or is zero-length)
  }
  else {
    # Contains at least one non-letter.
  }

---------------------------------------------------------------------
   |   Craig Berry - cberry@cinenet.net
 --*--    Home Page: http://www.cinenet.net/users/cberry/home.html
   |      "Ripple in still water, when there is no pebble tossed,
       nor wind to blow..."


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

Date: Tue, 17 Nov 1998 16:26:45 -0800
From: "Josh Burley" <jburley@uci.edu.NOSPAM>
Subject: NT security + IIS + perl
Message-Id: <72t470$9fg@news.service.uci.edu>

Hey kids... I just secured a directory so that you have to log in... I can
get a listing of the contents of the directory, but any perl scripts gives
the error:

-------------------------
CGI Error
The specified CGI application misbehaved by not returning a complete set of
HTTP headers. The headers it did return are:


Can't open perl script "d:\catalyst\dev\cgi\personal.pl": Permission denied
-------------------------


Any ideas? What's up?

jburley@gsm.uci.edu.NOSPAM




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

Date: Wed, 18 Nov 1998 01:29:00 GMT
From: Tom Phoenix <rootbeer@teleport.com>
Subject: Re: NT security + IIS + perl
Message-Id: <Pine.GSO.4.02A.9811171727140.27321-100000@user2.teleport.com>

On Tue, 17 Nov 1998, Josh Burley wrote:

> Hey kids... 

"Kids"? Who are you calling kids? Maybe you meant to post this to a
newsgroup about Python. :-)

> I just secured a directory so that you have to log in... 

_I_ don't have to log in. 

> I can get a listing of the contents of the directory, but any perl
> scripts gives the error:
> 
> -------------------------
> CGI Error

When you're having trouble with a CGI program in Perl, you should first
look at the please-don't-be-offended-by-the-name Idiot's Guide to solving
such problems. It's available on CPAN.

   http://www.perl.com/CPAN/
   http://www.perl.org/CPAN/
   http://www.perl.org/CPAN/doc/FAQs/cgi/idiots-guide.html
   http://www.perl.org/CPAN/doc/manual/html/pod/

Hope this helps!

-- 
Tom Phoenix       Perl Training and Hacking       Esperanto
Randal Schwartz Case:     http://www.rahul.net/jeffrey/ovs/



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

Date: Wed, 18 Nov 1998 02:05:18 GMT
From: technik@clio.muses.agoron.com ()
Subject: Re: Perl scripts as a NT service
Message-Id: <slrn754b44.k6.technik@clio.muses.agoron.com>

In article <slrn751q5c.j9.technik@clio.muses.agoron.com>,
technik@clio.muses.agoron.com wrote:
>To the original poster, have you tried pointing to them using UNC's? You may fix
>it if you explicitly name the path for everything in a UNC-ish way (like
>\\myserver\home\perl\lib\...) by hackiing @INC from a BEGIN subroutine.
>You should also verify that the script is running as a user with rights to the
>directory in question. The default is the local system account which, depending
>upon lots of things, might not. Also, remember that normal NT services can
>interact with the user or access the network but not both. I do not know if perl
>scripts are subject to the same limitation.
	[snip]

I know it is poor etiquette to follow up my own posting but I experimented at
work today. I wrote a simple script (servtest.pl) that writes Net:Ping results
to a logfile.  Perl is installed locally and the environment is correctly
configured but I could not get the script to run as a service and neither could
I get 'perl.exe servtest.pl' to run in this manner no matter what I did to
qualify the path. The solution was to register SRVANY.EXE from the Microsoft
NT 4.0 Resource Kit as a service and set the perl interpreter, the script and
the working directory as application parameters in the registry according to
the documentation. The script worked as the System Account and as a domain
user. I did not have a remote installation of perl to test against.

Hope this helps.

Ross
lonstein at bigfoot dot com


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

Date: 17 Nov 1998 19:23:31 -0500
From: ziggy@panix.com (Adam Turoff)
Subject: Re: Perl Usage Survey - interpretations, anyone?
Message-Id: <72t423$42v@panix.com>

Uri Guttman  <uri@fastengines.com> wrote:
>>>>>> "AT" == Adam Turoff <ziggy@panix.com> writes:
>  AT> On the flip side, there's a rub in paying for an experienced admin
>  AT> to babysit a 15-node network.
>
>  AT> Ideally, Linux will take off with the notion of a p/t sysadmin who takes
>  AT> care of your network and 3-8 others from home will take off.  
>
>that is a good ideal, but if the gateway system gets hosed (linux or
>u$hit), remote sysadmining is not a nice thing. but mom&pop will have
>problems with whatever they use in that case. there ain't no easy way to
>have true 24x7 without someone on the physical premises. someone has to
>hit the power button!

There are a few simple answers to that, but they're not failsafe.

And there's no way a mom&pop who just want to get their job done would 
know the first thing about accidentally acting as an anonomous sendmail
redirector because their incompetant admin is overcharging them and playing
doom when he's not answering their calls on the red phone.

Sounds like a new class of ISP service - connectivity and such, no questions
asked; lease the server and pay the monthly bandwidth bill and we'll take
care of the rest.  

I think AT&T used to use this model.  Look at where they are today.  :-)

Z.



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

Date: 18 Nov 1998 00:31:20 GMT
From: dformosa@zeta.org.au (David Formosa)
Subject: Re: Perl Usage Survey - interpretations, anyone?
Message-Id: <slrn7545ao.696.dformosa@godzilla.zeta.org.au>

In article <sarr9v1evbh.fsf@camel.fastserv.com>, Uri Guttman wrote:

[...]

> there ain't no easy way to
>have true 24x7 without someone on the physical premises. someone has to
>hit the power button!

You can have remote powermainigment systems where you can push the big red 
button remotely.

-- 
Please excuse my spelling as I suffer from agraphia. See
http://www.zeta.org.au/~dformosa/Spelling.html to find out more.



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

Date: 17 Nov 1998 19:35:43 -0500
From: Uri Guttman <uri@fastengines.com>
Subject: Re: Perl Usage Survey - interpretations, anyone?
Message-Id: <sarlnl9et28.fsf@camel.fastserv.com>

>>>>> "AT" == Adam Turoff <ziggy@panix.com> writes:

  AT> Uri Guttman  <uri@fastengines.com> wrote:
  >> that is a good ideal, but if the gateway system gets hosed (linux or
  >> u$hit), remote sysadmining is not a nice thing. but mom&pop will have
  >> problems with whatever they use in that case. there ain't no easy way to
  >> have true 24x7 without someone on the physical premises. someone has to
  >> hit the power button!

  AT> And there's no way a mom&pop who just want to get their job done
  AT> would know the first thing about accidentally acting as an
  AT> anonomous sendmail redirector because their incompetant admin is
  AT> overcharging them and playing doom when he's not answering their
  AT> calls on the red phone.

  AT> Sounds like a new class of ISP service - connectivity and such, no
  AT> questions asked; lease the server and pay the monthly bandwidth
  AT> bill and we'll take care of the rest.

sounds like a cross between colocation and standard virtual hosting. i
have not seen such a package offered anywhere. the problem occurs with
how much handholding and support do you get for your money. there are
companies that will do all your web work for a fee and they buy bulk
virtual hosts or a colocated system and resell them. but if they are not
on site then they rely on their provider's 24x7 support. just another
layer of support to pay for.

but this thread is getting off perl and the usage survey. i never heard
much about my conjecture that commercial unix users are more likely to
know and use perl than linux users because of their more professional
background. 

uri

-- 
Uri Guttman                  Fast Engines --  The Leader in Fast CGI Technology
uri@fastengines.com                                  http://www.fastengines.com


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

Date: 17 Nov 1998 19:57:07 -0500
From: ziggy@panix.com (Adam Turoff)
Subject: Re: Perl Usage Survey - interpretations, anyone?
Message-Id: <72t613$6dj@panix.com>

Jaime Metcher  <metcher@spider.herston.uq.edu.au> wrote:
>Adam Turoff wrote:
>> NT was designed to sell servers to people who didn't know what a server
>> was supposed to do or why the need servers.  That market is still pretty
>> big and growing, but it's also realizing that BSOD is a feature you want
>> to avoid on a server, or servers are so complex that you want someone who
>> knows the magic incantations to maintain 24x7, not NT's 23x6.
>
>Servers complex?  Servers are simple (compared to, say, SAP R3 or
>Microsoft Office).  

Which audience are you talking about?  Mom&pop's non-profit, Uncle
Ted's small legal practice, or people who read comp.os.linux.announce?  :-)

There are still people out there (including most lawyers) who would 
need a month's supply of valium after attempting to install an OS from 
scratch.  It's _that_ distressing and complex.

>Keeping them reliable is difficult, but then simple
>doesn't mean easy.

Very true.

Z.



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

Date: 17 Nov 1998 20:43:16 -0500
From: Uri Guttman <uri@sysarch.com>
Subject: Re: Perl Usage Survey - interpretations, anyone?
Message-Id: <x7lnl94vyj.fsf@sysarch.com>

>>>>> "DF" == David Formosa <dformosa@zeta.org.au> writes:

  DF> In article <sarr9v1evbh.fsf@camel.fastserv.com>, Uri Guttman wrote:
  DF> [...]

  >> there ain't no easy way to
  >> have true 24x7 without someone on the physical premises. someone has to
  >> hit the power button!

  DF> You can have remote powermainigment systems where you can push the
  DF> big red button remotely.

is it failsafe? what if the remote power box dies? who watches the
watcher? and will mom&pop buy one?

answers to these and other questions will be found in the next
installment of "as the perl earns"!

uri

-- 
Uri Guttman  -----------------  SYStems ARCHitecture and Software Engineering
Perl Hacker for Hire  ----------------------  Perl, Internet, UNIX Consulting
uri@sysarch.com  ------------------------------------  http://www.sysarch.com
The Best Search Engine on the Net -------------  http://www.northernlight.com


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

Date: 17 Nov 1998 20:48:53 -0500
From: ziggy@panix.com (Adam Turoff)
Subject: Re: Perl Usage Survey - interpretations, anyone?
Message-Id: <72t925$a8p@panix.com>

Uri Guttman  <uri@fastengines.com> wrote:
>but this thread is getting off perl and the usage survey. i never heard
>much about my conjecture that commercial unix users are more likely to
>know and use perl than linux users because of their more professional
>background. 

Oh.  Right.  <aol>ME TOO!</aol>

While I accept that you have a very bad impression about linux users, 
they're not really the great unwashed you make them out to be.  I seem
to remember that a certain Mr. Wall and a certain Mr. Christiansen
count themselves among the ever-increasing numbers of linux users.  :-)

Nevertheless, I think you should draw the line around 'professional
experience/background' and not 'commercial vs. linux'.  The commercial
vs. linux point you make .  Many of
us use Linux/*BSD because the hardware was/is cheaper - that's it.

Your argument seems to have the unstated basis that anyone who uses/has 
used solaris is a solaris user and more likely to be profesional, whether 
or not they use linux.  

Z.

[admit it, uri.  solaris is dead.  aix is dead.  decunix is dead. 
just try linux.  you'll like it.  the first distribution is free.  :-) ]



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

Date: Wed, 18 Nov 1998 00:22:31 GMT
From: Tom Phoenix <rootbeer@teleport.com>
Subject: Re: Perl5
Message-Id: <Pine.GSO.4.02A.9811171619470.27321-100000@user2.teleport.com>

On Tue, 17 Nov 1998, Paul Deshaies wrote:

> 	I just sent a message asking for help. I'm pretty sure
> installing PERL5 on my UNIX server would get me rid of my problem.

Well, at least some problems... :-)

> My question now is how long does it take to install PERL5

Between three minutes and three days. On my system, about ten minutes,
which is probably about typical.

> and what problems can I expect?

Not many, if you read the INSTALL document before you start and if you
know (someone who knows) the answers for the ./Configure script. But if
you don't know the answers, just go with the defaults, and you'll be right
more than 99% of the time. Good luck!

-- 
Tom Phoenix       Perl Training and Hacking       Esperanto
Randal Schwartz Case:     http://www.rahul.net/jeffrey/ovs/



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

Date: 18 Nov 1998 01:07:56 GMT
From: ecki@lina.inka.de
Subject: Re: Raw Sockets
Message-Id: <72t6lc$8od$1@sapa.inka.de>

In comp.security.unix Marquis de Carvdawg <carvdawg@patriot.net> wrote:
> What you have provided is good, and I do appreciate your time,
> but it is not at all what I am looking for...I am looking for "raw"
> sockets.

Just look on http://www.inka.de/sites/lina/freefire-l/tools.html, there are
2 shell-toolkits for IP-Packet-Generation. (ipsend und SPAK).

Greetings
Bernd


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

Date: Tue, 17 Nov 1998 19:32:51 -0500
From: JTJ <jtjohnston@courrier.usherb.ca>
Subject: Smarter Web Mailer
Message-Id: <365215B2.625E@courrier.usherb.ca>

I am playing with a Web-Based E-mailer. How do I extract a web address
in a block of text and replace it with a link:

-------- Sample message ---------
here is the link:
http://somewhere.com
---------------------------------

---------- What I want ----------
here is the link:
<A HREF="http://somewhere.com">http://somewhere.com</A>
---------------------------------

I would use a substitution string:

$message =~ s/???/???/g;

Something like??

	$message =~ s/http:\/\/\s*(\w+|$)/????/go;

Thanks in advance.

JTJ


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

Date: Tue, 17 Nov 1998 21:49:42 -0500
From: JTJ <jtjohnston@erase.courrier.usherb.ca>
Subject: Substitution Grief
Message-Id: <365235C6.2EF4@erase.courrier.usherb.ca>

I am playing with a Web-Based E-mailer. How do I extract a web address
in a block of text and replace it with a link:

-------- Sample message ---------
here is the link:
http://somewhere.com
---------------------------------

---------- What I want ----------
here is the link:
<A HREF="http://somewhere.com">http://somewhere.com</A>
---------------------------------

I would use a substitution string:

$message =~ s/???/???/g;

Something like??

        $message =~ s/http:\/\/\s*(\w+|$)/????/go;

Thanks in advance.

JTJ


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

Date: Wed, 18 Nov 1998 01:25:28 GMT
From: Tom Phoenix <rootbeer@teleport.com>
Subject: Re: User ID problem
Message-Id: <Pine.GSO.4.02A.9811171721430.27321-100000@user2.teleport.com>

On Tue, 17 Nov 1998 email@address.com [ what an address! ] wrote:

> Right now, the user stores their Name and ID in a cookie--which works
> fine. However, if the user does not support or rejects cookies, I am
> screwed. 

Sounds as if you're doing CGI programming; this is stuff that's the same
no matter whether you're using Perl or not. Perhaps you could find
something useful in the docs, FAQs, or newsgroups about CGI programming.
Good luck!

-- 
Tom Phoenix       Perl Training and Hacking       Esperanto
Randal Schwartz Case:     http://www.rahul.net/jeffrey/ovs/



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

Date: Tue, 17 Nov 1998 18:26:01 -0500
From: "Rambler" <rambler@bloomington.in.us>
Subject: Win32 executing a .pl or .cgi
Message-Id: <72t1eb$9op$1@news.hoosier.net>

I have associated the .pl and .cgi file extensions with perl.exe on my
system and can double click on the file in the explorer and the program
runs.  I can also at the dos prompt tyep 'perl test.pl' and the program runs
but I can't just type test.pl.  All I get is "Bad command or file name
".  This is obviously preventing anything to work from a web page.

Can anyone tell me what I am doing wrong?  All I can find anyplace I have
search says I must simply associat the pl and cgi extensions with perl.exe.

--
Rambler






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

Date: 18 Nov 1998 02:28:05 GMT
From: "Allan M. Due" <due@murray.fordham.edu>
Subject: Re: Win32 executing a .pl or .cgi
Message-Id: <72tbbl$s50$0@206.165.167.238>

Rambler wrote in message <72t1eb$9op$1@news.hoosier.net>...
>I have associated the .pl and .cgi file extensions with perl.exe on my
>system and can double click on the file in the explorer and the program
>runs.  I can also at the dos prompt tyep 'perl test.pl' and the program
runs
>but I can't just type test.pl.  All I get is "Bad command or file name
>".  This is obviously preventing anything to work from a web page.
>

Well, it really isn't that obvious to me but, hey, my wife often says I am
very thick headed at times.

>Can anyone tell me what I am doing wrong?  All I can find anyplace I have
>search says I must simply associat the pl and cgi extensions with perl.exe.

Actually it sounds like you have done everything but check how your web
server needs to be configured in order to implement CGI.  It will vary from
server to server so you need to check the documentation.  No server that I
am familiar with requires that you be able to run a script at the prompt
simply by typing the name of the script.  Perl usually does need to be in
your path but that is not your problem here.

HTH
AmD






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

Date: Wed, 18 Nov 1998 00:26:13 GMT
From: Tom Phoenix <rootbeer@teleport.com>
Subject: Re: Working with *in and mkdir()
Message-Id: <Pine.GSO.4.02A.9811171623310.27321-100000@user2.teleport.com>

On Tue, 17 Nov 1998, illfigah wrote:

>     require "cgi-lib.pl";
>     &ReadParse;
> 
>     &create_directory(*in);

Don't pass a typeglob if you can help it. Here, I'm sure you can help it. 

If you use the CGI module, you'll have an easier time of it, in general.

>      sub create_directory{
> 
>      print "Content-type: text/html \n\n";
>      $username = $in{'auth_user_name'};

If you do want to pass a typeglob, see the perlsub manpage. If you don't
want to pass a typeglob, see the perlsub manpage. :-)

>      print "This is the username: $username";
> 
>      mkdir($username, 0777) || die "Can't make directory: $! \n";
> 
>      exit();
> 
>     }

Do you mean to call exit there? Maybe you should check the perlfunc
manpage for what exit does.

Hope this helps!

-- 
Tom Phoenix       Perl Training and Hacking       Esperanto
Randal Schwartz Case:     http://www.rahul.net/jeffrey/ovs/



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

Date: 12 Jul 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 Mar 98)
Message-Id: <null>


Administrivia:

Special notice: in a few days, the new group comp.lang.perl.moderated
should be formed. I would rather not support two different groups, and I
know of no other plans to create a digested moderated group. This leaves
me with two options: 1) keep on with this group 2) change to the
moderated one.

If you have opinions on this, send them to
perl-users-request@ruby.oce.orst.edu. 


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

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