[16001] in Perl-Users-Digest

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

Perl-Users Digest, Issue: 3413 Volume: 9

daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sun Jun 18 14:05:21 2000

Date: Sun, 18 Jun 2000 11:05:09 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <961351509-v9-i3413@ruby.oce.orst.edu>
Content-Type: text

Perl-Users Digest           Sun, 18 Jun 2000     Volume: 9 Number: 3413

Today's topics:
    Re: bug with arrays? (Randal L. Schwartz)
    Re: Checking for open socket before writing to it? <bkennedy99@home.com>
    Re: Checking for open socket before writing to it? <godzilla@stomp.stomp.tokyo>
    Re: Content type !! (Abigail)
    Re: Converting Char to Hex .. <oke@oke.oke>
    Re: Crazy enough that it might just work... <henry@penninkilampi.net>
    Re: Crazy enough that it might just work... <mike@crusaders.no>
    Re: good books for beginning Perl? <damonNOdaSPAM@unispace.com.invalid>
    Re: How to determine a fake email address <henry@penninkilampi.net>
    Re: How to determine a fake email address (Abigail)
        How to send files across the internet? <shantha@socal.rr.com>
    Re: How to send files across the internet? (Abigail)
    Re: How to send files across the internet? <shantha@socal.rr.com>
    Re: How to send files across the internet? <rootbeer@redcat.com>
    Re: IRC and HTTPd <rootbeer@redcat.com>
    Re: ls <tony_curtis32@yahoo.com>
    Re: module fields <rootbeer@redcat.com>
        Perl :) <damonNOdaSPAM@unispace.com.invalid>
    Re: Perl :) <rootbeer@redcat.com>
    Re: subdomain name forwarding scripts ?? <rootbeer@redcat.com>
    Re: Variable variable names, was Re: now this is strang (Eric Bohlman)
    Re: win2K and perl include problem! <hedim@hta-bi.bfh.xxx>
        Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)

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

Date: 18 Jun 2000 08:30:57 -0700
From: merlyn@stonehenge.com (Randal L. Schwartz)
Subject: Re: bug with arrays?
Message-Id: <m1wvjnhuq6.fsf@halfdome.holdit.com>

>>>>> "Aaron" == Aaron  <alager@csuchico.edu> writes:

Aaron> When we get to this point in the code $record[$i] is a date: mm-dd-yyyy
Aaron> $record[$i]="10-8-1999"; #doesn't work
Aaron> $record[$i]="11-8-1999"; #will work

Aaron> any time the first number is 10, it fails.

Smells like someone used "oct" as a bareword. :)

-- 
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
<merlyn@stonehenge.com> <URL:http://www.stonehenge.com/merlyn/>
Perl/Unix/security consulting, Technical writing, Comedy, etc. etc.
See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training!


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

Date: Sun, 18 Jun 2000 17:00:27 GMT
From: "Ben Kennedy" <bkennedy99@home.com>
Subject: Re: Checking for open socket before writing to it?
Message-Id: <Le735.10525$A%3.91697@news1.rdc2.pa.home.com>

> The server occasionaly shuts down, thereby closing the socket and my print
> command:
> $socket1->print($message);
> fails and I get a Broken Pipe message and the script just exits.

A 'Broken Pipe' occurs when you attempt to write to a socket (or any file
descriptor) whose reading end is closed - the OS sends you a SIGPIPE, or
returns EPIPE on the failed write attempt.  Are you trying to pass large
amounts of data at a time through the socket?  If the socket dies midway
through the write, this may happen even though the socket was 100%
operational when the write began.  You may want to set $SIG{PIPE} to IGNORE
(this allows the write command to return the error as opposed to receiving a
signal which isn't safe), and use the syswrite() command to pass data to the
socket, always checking the value of $!.  I'm not sure which value of $!
(the ERRNO) corresponds to EPIPE, but it shouldn't be hard to figure it out,
and it may be in the POSIX module.  Good luck!

--Ben Kennedy




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

Date: Sun, 18 Jun 2000 10:23:17 -0700
From: "Godzilla!" <godzilla@stomp.stomp.tokyo>
Subject: Re: Checking for open socket before writing to it?
Message-Id: <394D0585.7DD46F4E@stomp.stomp.tokyo>

Ben Kennedy wrote:
 
> > The server occasionaly shuts down, thereby closing the socket and my print
> > command:
> > $socket1->print($message);
> > fails and I get a Broken Pipe message and the script just exits.

> A 'Broken Pipe' occurs when you attempt to write to a socket 
> (or any file descriptor) whose reading end is closed - the OS
> sends you a SIGPIPE, or returns EPIPE on the failed write attempt.
> Are you trying to pass large amounts of data at a time through the
> socket?  If the socket dies midway through the write, this may happen
> even though the socket was 100% operational when the write began.  
> You may want to set $SIG{PIPE} to IGNORE (this allows the write 
> command to return the error as opposed to receiving a signal which
> isn't safe), and use the syswrite() command to pass data to the
> socket, always checking the value of $!.  I'm not sure which value
> of $! (the ERRNO) corresponds to EPIPE, but it shouldn't be hard to 
> figure it out, and it may be in the POSIX module.  



> Good luck!



Do you have some code samples showing how to accomplish this?


Godzilla!


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

Date: 18 Jun 2000 11:49:08 EDT
From: abigail@delanet.com (Abigail)
Subject: Re: Content type !!
Message-Id: <slrn8kpstm.ojo.abigail@alexandra.delanet.com>

Arun Mahajan (arun67@yahoo.com) wrote on MMCDLXXXII September MCMXCIII in
<URL:news:642A954DD517D411B20C00508BCF23B00129359B@mail.sauder.com>:
() Hi Everybody,
() 
() Is there anybody who could tell me why i am getting this output.
() 
() code:-
() ------
() 
() print "Content-type: text/html\n\n";
() 
() print "Hello World\n";


Well, let's see. First, you let it print "Content-type: text/html"
followed by two newlines, then you let it print "Hello world"
followed by a newline.

() output:-
() -------
() 
() Content-type: text/html
() 
() Hello World

And guess what? The output is "Content-type: text/html", 2 newlines, 
"Hello world" and a newline. 

I fail to see why this is surprising to you.

() does it mean I can not specify my content type.

I don't know. That's not a Perl question. Perl doesn't care about
content types. Content types aren't Perl things. Now, you might use
your program in a certain environment that deals with "Content-type"s.
You don't tell use what than environment is, so it's impossible to
answer. But, even if you told us, it's off-topic in this group.

Experience has shown that your question is most likely CGI related.
If you want to know whether, and how, you can set Content-types in
CGI related programs, ask in a group related about CGI.

It's down the hall, to your left. Just follow the smell.



Abigail
-- 
perl -wlpe '}$_=$.;{' file  # Count the number of lines.


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

Date: Sun, 18 Jun 2000 15:07:10 GMT
From: "Gmo" <oke@oke.oke>
Subject: Re: Converting Char to Hex ..
Message-Id: <yA535.50625$xe3.344538@nlnews00.chello.com>

thanx =]

--
________________________________________
God placed me on this earth to accomplish a certain number of things...
right now i'm so far behind i'll never die !!!
http://www.overdoos.com
________________________________________
Tina Mueller <tina@streetmail.com> wrote in message
news:8igvug$4rvsv$3@fu-berlin.de...
> hi,
>
> Gmo <oke@oke.oke> wrote:
> > I cant find anything on convering a char to a hexidecimal value in one
> > function .. i wanted to use it in a regular expression .. basically i
wanna
> > do and inverted version of  the well known:
> > $value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
> > i just cant seem to figure it out .. can someone help me??? ..
>
> try it with the escape routine in CGI.pm:
>
> $value =~ s/([^a-zA-Z0-9_.-])/sprintf("%%%02X",ord($1))/eg;
>
> tina
>
> --
> http://tinita.de    \  enter__| |__the___ _ _ ___
> tina's moviedatabase \     / _` / _ \/ _ \ '_(_-< of
> search & add comments \    \ _,_\ __/\ __/_| /__/ perception




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

Date: Mon, 19 Jun 2000 00:41:21 +0930
From: Henry <henry@penninkilampi.net>
Subject: Re: Crazy enough that it might just work...
Message-Id: <henry-3E7A94.00412119062000@news.metropolis.net.au>

In article <S3Q25.677$061.14734@news1.rdc1.mb.home.com>, 
andrew-johnson@home.com wrote:

>> I think a clueful person, who is also somewhat considerate and
>> patient, would come back - yes.  Such (additional) qualities
>> would then be a valuable addition to the culture of this place.
> 
> Often, the clueful person doesn't have a question but an answer --
> and how likely is it that they will post their answer knowing that
> it will be so delayed as to very likely only serve to bring back a
> thread that worked itself out several days ago.
> 
> It was mid 96 when I first starting lurking in clpm, and late 96
> before I ever chose to post something (a reply to a post). Had there
> been an 8 day delay I probably would have decided not to post for
> that exact reason.

Why not CC your response via email?  That way they get the answer 
immediately, and your post goes through for the record?


> And, if I had decided to post, I'd have been back
> in the same boat each time I subsequently changed email addresses
> (I've had 3 since then).

Good point.

<thinks>

The bot could easily be programmed to recognise a "change of address" 
command.  Before you change email addresses, simply email the bot with 
your new address, and it will update its database so you don't have to 
wait again.

Much how commands to list servers work.


> I do not see how your proposed policy really helps the group out at
> all.

It is not designed to make life easier for newbies.  Life is already as 
easy for newbies as it can possiby be - they have free reign to exploit 
the gurus here at their pleasure.  Nothing can possibly make it any 
better for them.

It aims to protect the gurus from parasites by filtering out really 
impatient people.  If it accomplishes that, then the guru burn-out rate 
should drop, and they will be able to hang around longer sharing their 
collected wisdom with _genuine_ newbies.

If you are a _genuine_ newbie, that means you get access to more gurus, 
for a longer period of time.


> Newcomers who don't understand usenet and don't lurk will still
> post, and their posts will still clutter this group (after an 8 day
> delay)

Not so.  See my response to Abigail's post...

  <henry-856462.00193719062000@news.metropolis.net.au>


> The only people your policy will really impact is newcomers
> who have lurked for a while and now have something useful to
> contribute in the way of answers to questions but won't bother
> because they know their post will not arrive in a timely fashion.

Impatient people with _questions_ can check the FAQ and the web.  
Impatient people with _answers_ can CC email them straight to the person 
asking the question.

Henry.


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

Date: Sun, 18 Jun 2000 17:12:23 +0200
From: "Trond Michelsen" <mike@crusaders.no>
Subject: Re: Crazy enough that it might just work...
Message-Id: <zG535.3386$eI.64141@news1.online.no>

Henry <henry@penninkilampi.net> skrev i
meldingsnyheter:henry-856462.00193719062000@news.metropolis.net.au...

> What could we possibly lose?

This place.

--
Trond Michelsen




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

Date: Sun, 18 Jun 2000 09:45:39 -0700
From: damonr <damonNOdaSPAM@unispace.com.invalid>
Subject: Re: good books for beginning Perl?
Message-Id: <141a53b8.6ee22061@usw-ex0105-037.remarq.com>

http://www.devcritic.com/bookstore/serverside/Perl.php3

Got questions?  Get answers over the phone at Keen.com.
Up to 100 minutes free!
http://www.keen.com



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

Date: Mon, 19 Jun 2000 02:27:38 +0930
From: Henry <henry@penninkilampi.net>
Subject: Re: How to determine a fake email address
Message-Id: <henry-60AE0E.02273819062000@news.metropolis.net.au>

In article <394C32DB.45200417@softouch.on.ca>, Amer Neely 
<aneely@softouch.on.ca> wrote:

> I'm using Perl to call sendmail to mail information to an address
> supplied by a user in the form. I can check to see if the address is in
> the correct format, but is there any way I can find out if the message
> actually went through or bounced? I'm hoping there is a flag I can check
> with Perl? I would like to check for both Host unknown and User unknown
> errors. If I can do this *before* sending the message all the better.
> Thanks for any help.

---
#!/usr/bin/perl -w

$theirMailServer = 'their.mail.server';
$theirUserName = 'username';
$yourHostName = 'your.host.name';

use Net::SMTP;

$m = Net::SMTP->new($theirMailServer,
                    Hello => $yourHostName,
                    Timeout => 30,
                    Debug   => 1);

if ($m && $m->verify($theirUserName))
{
  # server will accept mail for this user
  # send your message now
}
else
{
  # problem somewhere
}

$m->quit if ($m);
---

Have a bit of a play with this script and you'll find out, first-hand, 
what Abigail and Tom are talking about.

Basically, what it amounts to is that there is no _reliable_ way of 
finding out whether or not an email address is valid or not.  Regardless 
of how clever your program is, you're not going to get anywhere near a 
confidence level of 100%.  You'd be lucky to break 50%.

Leave the "Debug" setting at 1 (you can turn it off by setting it to 0).  
With debug mode on, you'll see all the gory communications that pass 
between you and the mail server at the other end.

Point it at a pile of different servers, and you'll see how there is 
variation in the way that they respond.  You'll notice that some don't 
respond at all.  You'll see some bizarre things that just don't seem to 
make any sense.  You'll find addresses which _do_not_ verify can 
actually be delivered to, and you'll find addresses that _do_ verify 
will reject your deliver attempts.

Welcome to the world of SMTP!

After you play with this for a few hours, or a few days, you'll give up.  
Everyone does.  But in that time you will have proven, _to_yourself_ 
that what the folks have told you here is pretty darn accurate.

You _cannot_, in any reliable manner whatsoever, determine if an email 
address is valid or not.

And once you've experienced this truth for yourself, you can spread the 
word, put people straight in other forums apart from this, save a lot of 
people a lot of time, and make the world a better place.

Henry.


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

Date: 18 Jun 2000 13:10:45 EDT
From: abigail@delanet.com (Abigail)
Subject: Re: How to determine a fake email address
Message-Id: <slrn8kq1mq.ojo.abigail@alexandra.delanet.com>

Henry (henry@penninkilampi.net) wrote on MMCDLXXXIII September MCMXCIII
in <URL:news:henry-60AE0E.02273819062000@news.metropolis.net.au>:
%% 
%% #!/usr/bin/perl -w

no use strict;

%% $theirMailServer = 'their.mail.server';

And where does 'their.mail.server' come from? What if there are 
multiple mail servers?

%% $theirUserName = 'username';
%% $yourHostName = 'your.host.name';
%% 
%% use Net::SMTP;
%% 
%% $m = Net::SMTP->new($theirMailServer,
%%                     Hello => $yourHostName,
%%                     Timeout => 30,
%%                     Debug   => 1);

What if new() fails?



Abigail
-- 
perl -e '$a = q 94a75737420616e6f74686572205065726c204861636b65720a9 and
         ${qq$\x5F$} = q 97265646f9 and s g..g;
         qq e\x63\x68\x72\x20\x30\x78$&eggee;
         {eval if $a =~ s e..eqq qprint chr 0x$& and \x71\x20\x71\x71qeexcess}'


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

Date: Sun, 18 Jun 2000 15:55:01 GMT
From: "Shruti" <shantha@socal.rr.com>
Subject: How to send files across the internet?
Message-Id: <ph635.63932$WS3.646703@typhoon.we.rr.com>

Hi,

In my project, I need to send file/s across the intranet from my web page.
The user chooses file/s and hits the submit button and the cgi script should
send the file/s to the server.

How to do this?

Thanks
Shantha




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

Date: 18 Jun 2000 12:12:43 EDT
From: abigail@delanet.com (Abigail)
Subject: Re: How to send files across the internet?
Message-Id: <slrn8kpua2.ojo.abigail@alexandra.delanet.com>

Shruti (shantha@socal.rr.com) wrote on MMCDLXXXIII September MCMXCIII in
<URL:news:ph635.63932$WS3.646703@typhoon.we.rr.com>:
{} Hi,
{} 
{} In my project, I need to send file/s across the intranet from my web page.
{} The user chooses file/s and hits the submit button and the cgi script should
{} send the file/s to the server.
{} 
{} How to do this?


The same way as you would when writing it in C, Python, Miranda or Eiffel.



Abigail
-- 
%0=map{reverse+chop,$_}ABC,ACB,BAC,BCA,CAB,CBA;$_=shift().AC;1while+s/(\d+)((.)
(.))/($0=$1-1)?"$0$3$0{$2}1$2$0$0{$2}$4":"$3 => $4\n"/xeg;print#Towers of Hanoi


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

Date: Sun, 18 Jun 2000 16:18:17 GMT
From: "Shruti" <shantha@socal.rr.com>
Subject: Re: How to send files across the internet?
Message-Id: <dD635.63939$WS3.646897@typhoon.we.rr.com>

Hi,

I guess I did not make myself clear.

I would like to know if there is a way for the server side cgi to do the
job. I do not want to write client side programs.

Thanks
shantha


Shruti wrote in message ...
>Hi,
>
>In my project, I need to send file/s across the intranet from my web page.
>The user chooses file/s and hits the submit button and the cgi script
should
>send the file/s to the server.
>
>How to do this?
>
>Thanks
>Shantha
>
>




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

Date: Sun, 18 Jun 2000 10:08:45 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: How to send files across the internet?
Message-Id: <Pine.GSO.4.10.10006181007510.29843-100000@user2.teleport.com>

On Sun, 18 Jun 2000, Shruti wrote:

> I would like to know if there is a way for the server side cgi to do the
> job. I do not want to write client side programs.

It sounds as if you have a question about CGI programming. Perhaps you
want to search for the docs, FAQs, and newsgroups about CGI programming.
Reading comp.infosystems.www.authoring.cgi may help you to get started.
Cheers!

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



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

Date: Sun, 18 Jun 2000 09:42:27 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: IRC and HTTPd
Message-Id: <Pine.GSO.4.10.10006180941490.21108-100000@user2.teleport.com>

On Sun, 18 Jun 2000, Dominik Weiss wrote:

> I'm searching for a simple IRC server written in Perl or a http server
> which can handle more than one users the same time.
> 
> Does anyone know where to find some scripts/modules? Please no answers
> like "look at CPAN" - I already was there.

Okay. In what way were the solutions you found on CPAN insufficient for
your needs?

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



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

Date: 18 Jun 2000 12:33:46 -0500
From: Tony Curtis <tony_curtis32@yahoo.com>
Subject: Re: ls
Message-Id: <87em5u3nd1.fsf@limey.hpcc.uh.edu>

>> On Tue, 13 Jun 2000 10:46:40 -0400,
>> "MAP" <map@usnavy.gov> said:

> how can I get the files and directories (name and size)
> from PERL?  

To find the files in a given directory:

    perldoc -f opendir
    perldoc -f readdir
    perldoc -f closedir

To filter which of the files you want:

    perldoc -f grep

To find out info about each particular file:

    perldoc File::stat
    (perldoc -f stat)

hth
t
--
"Trying is the first step towards failure"
                                           Homer Simpson


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

Date: Sun, 18 Jun 2000 09:41:05 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: module fields
Message-Id: <Pine.GSO.4.10.10006180935230.21108-100000@user2.teleport.com>

On Sun, 18 Jun 2000, Yishay Weiss wrote:

> sub new {
> ...
> }

> We might sometimes get the message
> 
> 'no such array field at line XX'. Although one clearly sees 'x' was defined
> as a field. 

I asked you to "make a small, self-contained example program to show this
behavior." This is not that; you've omitted your definition of new().
Without that I can only guess that you didn't make a typed lexical. 

> We couldn't isolate this bug into a demo script, so we can only offer
> this description.

Did you try? If you had a demo script which included a proper new()
routine, why did you take it out? 

Well, the bug must be in the part you left out. :-)  Cheers!

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



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

Date: Sun, 18 Jun 2000 09:48:18 -0700
From: damonr <damonNOdaSPAM@unispace.com.invalid>
Subject: Perl :)
Message-Id: <19ab1a03.6f92f8f2@usw-ex0105-037.remarq.com>

Hi,
I am running a new site(http://www.devcritic.com) and i was
wondering if you people knew some good Perl resource sites that
i could add to the Perl part of the site directory:
http://www.devcritic.com/sites/Perl/. Feel free to add any sites
by clicking "Add a site" on the side menu or tell me here and i
will add em to there.

Thanks in advance.


Got questions?  Get answers over the phone at Keen.com.
Up to 100 minutes free!
http://www.keen.com



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

Date: Sun, 18 Jun 2000 10:11:33 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: Perl :)
Message-Id: <Pine.GSO.4.10.10006181009100.29843-100000@user2.teleport.com>

On Sun, 18 Jun 2000, damonr wrote:

> Subject: Perl :)

You already posted this once, with a different (but equally vague) subject
line. Please check out this helpful information on choosing good subject
lines. It will be a big help to you in making it more likely that your
requests will be answered.

    http://www.perl.com/CPAN/authors/Dean_Roehrich/subjects.post

If your posting didn't get an answer the first time you asked it, there
may be a good reason for that. Posting again isn't likely to fix anything,
unless you've changed something.

If you've asked clearly and no one has responded in a reasonable amount of
time, there's something else you can try before asking again. In reading
the newsgroup during the last month (you _have_ been doing that, haven't
you?) you must have noticed at least two or three people who post
frequently, politely, and accurately. A short, polite letter by private
e-mail to one of these folks asking for meta-help (help on getting help on
your problem) would not be out of line.

Thanks.

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



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

Date: Sun, 18 Jun 2000 10:07:19 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: subdomain name forwarding scripts ??
Message-Id: <Pine.GSO.4.10.10006181004160.29843-100000@user2.teleport.com>

On Sun, 18 Jun 2000, Ramya wrote:

> does this mean that I need to have multiple domain names parked. I
> mean do I need to register geeks.myname.com, music.myname.com etc
> parked separately in order to use them in the above url redirection.

Perhaps you meant to ask this in a newsgroup about DNS (or something like
that) rather than one about Perl. But, briefly, no, those are not separate
domains but subdomains. Your DNS administrator should be able to help you
with this. If you _are_ the DNS administrator, you should probably read
O'Reilly's "DNS and Bind" or a similar good book on DNS. Cheers!

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



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

Date: 18 Jun 2000 15:30:45 GMT
From: ebohlman@netcom.com (Eric Bohlman)
Subject: Re: Variable variable names, was Re: now this is strange...
Message-Id: <8iipv5$a31$3@slb0.atl.mindspring.net>

Abe Timmerman (abe@ztreet.demon.nl) wrote:
: There is a question in perlfaq7:
: 	"How can I use a variable as a variable name?"

Must be new in 5.6.0; it's not there in 5.005_03.



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

Date: Sun, 18 Jun 2000 19:48:14 +0200
From: Markus Hediger <hedim@hta-bi.bfh.xxx>
Subject: Re: win2K and perl include problem!
Message-Id: <394D0B5E.76AF7195@hta-bi.bfh.xxx>

hi there

Kopija wrote:
> <td> you are visitor nr.: <!--#exec cgi="cgi-bin/counter.plx"--></td>

try cmd= instead of cgi=, but then specify the absolute path to the file
you want to be executed.

> print "Content-type: text/html\n\n"

in the perl file, comment out the line above, the one that prints the
content-type declaration. you anyway don't need that.

no guarantee that this will work, it's just an idea.

> Is there something to setup in IIS5.0 or add some code in script???

what iis does is imho just stupid. if you want to include the output of
a script into your html document, there is no case where a http header
makes sense. at least i can't imagine such a case... well, maybe iis
just does do that because your script begins playing with headers, but
that doesn't change a lot - iis: "sorry, the user began these stupid
things, that's why i continued doing stupid things..." :)

maybe you could configure iis the way that there is no header when
including output of cgi apps, don't know. but however, microsoft's
default settings are again stupid, as seen already with outlook & co.

regards


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

Date: 16 Sep 99 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin) 
Subject: Digest Administrivia (Last modified: 16 Sep 99)
Message-Id: <null>


Administrivia:

The Perl-Users Digest is a retransmission of the USENET newsgroup
comp.lang.perl.misc.  For subscription or unsubscription requests, send
the single line:

	subscribe perl-users
or:
	unsubscribe perl-users

to almanac@ruby.oce.orst.edu.  

| NOTE: The mail to news gateway, and thus the ability to submit articles
| through this service to the newsgroup, has been removed. I do not have
| time to individually vet each article to make sure that someone isn't
| abusing the service, and I no longer have any desire to waste my time
| dealing with the campus admins when some fool complains to them about an
| article that has come through the gateway instead of complaining
| to the source.

To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.

To request back copies (available for a week or so), send your request
to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
where x is the volume number and y is the issue number.

For other requests pertaining to the digest, send mail to
perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
sending perl questions to the -request address, I don't have time to
answer them even if I did know the answer.


------------------------------
End of Perl-Users Digest V9 Issue 3413
**************************************


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