[13917] in Perl-Users-Digest

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

No subject found in mail header

daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Nov 10 17:47:57 1999

Date: Mon, 8 Nov 1999 12:53:14 -0800 (PST)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <942094394-v9-i1313@ruby.oce.orst.edu>
Content-Type: text

Perl-Users Digest           Mon, 8 Nov 1999     Volume: 9 Number: 1313

Today's topics:
    Re: Perl Unicode Support mehkriakram@my-deja.com
    Re: Perl Unicode Support (Kragen Sitaker)
    Re: Perl Unicode Support mehkriakram@my-deja.com
    Re: PERL/CGI Programmer Wanted for Contract Job and Pos (Michel Dalle)
    Re: PERL/CGI Programmer Wanted for Contract Job and Pos <gellyfish@gellyfish.com>
    Re: PERL/CGI Programmer Wanted for Contract Job and Pos (Michael Budash)
    Re: PERL/CGI Programmer Wanted for Contract Job and Pos <bivey@teamdev.com>
    Re: Perl4 and Y2K (Simon Cozens)
    Re: Perl4 and Y2K (Martien Verbruggen)
    Re: Perl4 and Y2K (Craig Berry)
        perlfunc manual <wobben@dds.nl>
    Re: perlfunc manual (Abigail)
    Re: perlfunc manual <aqumsieh@matrox.com>
    Re: perlfunc manual (Martien Verbruggen)
        Please help..... bababozorg@aol.com
    Re: Please help..... (Kragen Sitaker)
    Re: Please Perl, do what I ask !! <lr@hpl.hp.com>
    Re: Please Perl, do what I ask !! <gellyfish@gellyfish.com>
    Re: Please Perl, do what I ask !! <lr@hpl.hp.com>
    Re: Please Perl, do what I ask !! <aqumsieh@matrox.com>
        pod2html problems slavinger@my-deja.com
        pop mail <miguel@delirio.demon.co.uk>
    Re: pop mail (Michel Dalle)
    Re: pop mail amir142@my-deja.com
    Re: pop mail (Abigail)
        porting ksh to perl <john.everitt@best.ms.philips.com>
    Re: POST syntax problem... (Clinton Pierce)
    Re: POST syntax problem... <rhomberg@ife.ee.ethz.ch>
    Re: POST syntax problem... <gellyfish@gellyfish.com>
    Re: Premature End Of Script Headers <gellyfish@gellyfish.com>
        Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)

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

Date: Sat, 06 Nov 1999 08:43:13 GMT
From: mehkriakram@my-deja.com
Subject: Re: Perl Unicode Support
Message-Id: <800pn1$505$1@nnrp1.deja.com>

I am able to use Hindi, Simplified Chineses and Korean char sets as long
as the keyboard is english. Or atleast i am able to see hindi, chineses
and korean chars in the output generated


In article <mo%T3.25220$23.1299020@typ11.nn.bcandid.com>,
  kragen@dnaco.net (Kragen Sitaker) wrote:
> In article <7vo9kk$1kk$1@nnrp1.deja.com>,  <mehkriakram@my-deja.com>
wrote:
> >Hi. Hope to find u in great health
> >I am writing a cgi script which is supposed to take in user input and
> >convert it to pdf format.
> >
> >I am using Image::Magick for the conversion to pdf.
> >
> >The script works fine with english (iso-8859-1)(basic latin) but when
> >the user inputs non english language data string then the output is
just
> >junk.
>
> Does Image::Magick support other character sets?  I imagine it doesn't
> matter if the rest of Perl does or not, since Image::Magick is what's
> translating the user-entered sequences of bytes into PDF stuff, right?
>
> If it doesn't, you will have to build your PDF files by a different
> method or fix Image::Magick so it does.
> --
> <kragen@pobox.com>       Kragen Sitaker
<http://www.pobox.com/~kragen/>
> Tue Nov 02 1999
> 6 days until the Internet stock bubble bursts on Monday, 1999-11-08.
> <URL:http://www.pobox.com/~kragen/bubble.html>
>


Sent via Deja.com http://www.deja.com/
Before you buy.


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

Date: Sat, 06 Nov 1999 20:15:57 GMT
From: kragen@dnaco.net (Kragen Sitaker)
Subject: Re: Perl Unicode Support
Message-Id: <100V3.48748$23.1846191@typ11.nn.bcandid.com>

In article <800pn1$505$1@nnrp1.deja.com>,  <mehkriakram@my-deja.com> wrote:
>In article <mo%T3.25220$23.1299020@typ11.nn.bcandid.com>,
>  kragen@dnaco.net (Kragen Sitaker) wrote:
>> Does Image::Magick support other character sets?  I imagine it doesn't
>> matter if the rest of Perl does or not, since Image::Magick is what's
>> translating the user-entered sequences of bytes into PDF stuff, right?
>>
>> If it doesn't, you will have to build your PDF files by a different
>> method or fix Image::Magick so it does.
>
>I am able to use Hindi, Simplified Chineses and Korean char sets as long
>as the keyboard is english. Or atleast i am able to see hindi, chineses
>and korean chars in the output generated

So are you saying that yes, Image::Magick does support these other
charsets?  Or are you saying you have a means to input these, but
Image::Magick doesn't support them?  And it is Image::Magick that is
turning the user-entered sequences of bytes into PDF stuff, right?
-- 
<kragen@pobox.com>       Kragen Sitaker     <http://www.pobox.com/~kragen/>
Tue Nov 02 1999
6 days until the Internet stock bubble bursts on Monday, 1999-11-08.
<URL:http://www.pobox.com/~kragen/bubble.html>


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

Date: Sun, 07 Nov 1999 05:17:44 GMT
From: mehkriakram@my-deja.com
Subject: Re: Perl Unicode Support
Message-Id: <80321n$j6b$1@nnrp1.deja.com>

So are you saying that yes, Image::Magick does support these other
charsets?  Or are you saying you have a means to input these, but
Image::Magick doesn't support them?  And it is Image::Magick that is
turning the user-entered sequences of bytes into PDF stuff, right?

I am not really a computer programming freak. But what i really found
out is that if the keyboard layout was english but the font on the
server side was chinese/hindi/korean/japanese the generated images would
have chinese/hindi/korean/japanese chars.


Sent via Deja.com http://www.deja.com/
Before you buy.


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

Date: Sat, 06 Nov 1999 16:27:26 GMT
From: michel.dalle@usa.net (Michel Dalle)
Subject: Re: PERL/CGI Programmer Wanted for Contract Job and Possible Continuing Employment
Message-Id: <801kui$bou$1@xenon.inbe.net>

In article <2hciODVh=NrDLxHJjVadmsviIGE6@4ax.com>, island@scruznert.com wrote:
[snip]
>This is a great opportunity for someone with PERL/CGI
>talents to work for a company with great upside potential.
[snip]

Wow, I'm impressed ! What does that mean ?
Sounds like Dilbert got lost in c.l.p.m :-)

Michel.


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

Date: 6 Nov 1999 19:05:28 -0000
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: PERL/CGI Programmer Wanted for Contract Job and Possible Continuing Employment
Message-Id: <801u5o$bba$1@gellyfish.btinternet.com>

On Thu, 04 Nov 1999 15:34:43 -0800 Bruce Ehrlich wrote:
> 
> Please contact me immediately as migration is happening within a few
> days.
> 

<Best David Attenborough Hushed tone>

And here the herd of Internet Entrepreneurss huddled together before
their great annual migration across the Serengheti nervously finger
their mobile phones in expectant anticipation - the Males, unshaven in
their crumpled Armani, seem unable to control the urge to migrate ...

/J\
-- 
Jonathan Stowe <jns@gellyfish.com>
<http://www.gellyfish.com>
Hastings: <URL:http://dmoz.org/Regional/UK/England/East_Sussex/Hastings>


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

Date: Sat, 06 Nov 1999 13:36:53 -0800
From: mbudash@wcws.com (Michael Budash)
Subject: Re: PERL/CGI Programmer Wanted for Contract Job and Possible Continuing Employment
Message-Id: <mbudash-0611991336530001@adsl-216-103-91-123.dsl.snfc21.pacbell.net>

In article <801u5o$bba$1@gellyfish.btinternet.com>, Jonathan Stowe
<gellyfish@gellyfish.com> wrote:

> On Thu, 04 Nov 1999 15:34:43 -0800 Bruce Ehrlich wrote:
> > 
> > Please contact me immediately as migration is happening within a few
> > days.
> > 
> 
> <Best David Attenborough Hushed tone>
> 
> And here the herd of Internet Entrepreneurss huddled together before
> their great annual migration across the Serengheti nervously finger
> their mobile phones in expectant anticipation - the Males, unshaven in
> their crumpled Armani, seem unable to control the urge to migrate ...
> 
> /J\

i actually held my breath while reading that! (NEVER disturb a herd of
Internet Entrepreneurs)...
-- 
Michael Budash ~~~~~~~~~~ mbudash@wcws.com


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

Date: 8 Nov 1999 18:46:40 GMT
From: "William" <bivey@teamdev.com>
Subject: Re: PERL/CGI Programmer Wanted for Contract Job and Possible Continuing Employment
Message-Id: <01bf2a19$d8371220$3527e1ce@bill.jump.net>

Michel Dalle <michel.dalle@usa.net> wrote in article
<801kui$bou$1@xenon.inbe.net>...
> In article <2hciODVh=NrDLxHJjVadmsviIGE6@4ax.com>, island@scruznert.com
wrote:
> [snip]
> >This is a great opportunity for someone with PERL/CGI
> >talents to work for a company with great upside potential.
> [snip]
> 
> Wow, I'm impressed ! What does that mean ?
> Sounds like Dilbert got lost in c.l.p.m :-)

"great upside potential"
Translation: "We're currently in the crapper,
but the lid's up." -Wm



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

Date: 7 Nov 1999 07:23:54 GMT
From: simon@othersideofthe.earth.li (Simon Cozens)
Subject: Re: Perl4 and Y2K
Message-Id: <slrn82aa8a.o1i.simon@othersideofthe.earth.li>

Paul Kimoto (comp.lang.perl.misc):
>Didn't Knuth write, "Beware of bugs in the above code; I have only proved
>it correct, not tried it"? 

No. In fact, he's someone unclear as to why people keep attributing it
to him.

>It is possible that perl4 has a year-2000 bug,
>even though it is hard to imagine how.  But what if someone finds one?  No
>one will fix it.  The perl developers will just say, "so what?"

Indeed. If there's a reason *not* to upgrade, let's hear it. I'm
seriously curious as to why people don't want to.

Incidentally, there was nothing in Randal's post that was inaccurate or
untrue. There is simply a lot that is true but wasn't in the post.

-- 
The way I understand it, the Russians are sort of a combination of evil and
incompetence... sort of like the Post Office with tanks.
		-- Emo Philips


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

Date: 7 Nov 1999 11:18:33 GMT
From: mgjv@wobbie.heliotrope.home (Martien Verbruggen)
Subject: Re: Perl4 and Y2K
Message-Id: <slrn82ao1a.7sm.mgjv@wobbie.heliotrope.home>

On 7 Nov 1999 07:23:54 GMT,
	Simon Cozens <simon@othersideofthe.earth.li> wrote:
> Paul Kimoto (comp.lang.perl.misc):
> >Didn't Knuth write, "Beware of bugs in the above code; I have only proved
> >it correct, not tried it"? 
> 
> No. In fact, he's someone unclear as to why people keep attributing it
> to him.
> 
> >It is possible that perl4 has a year-2000 bug,
> >even though it is hard to imagine how.  But what if someone finds one?  No
> >one will fix it.  The perl developers will just say, "so what?"
> 
> Indeed. If there's a reason *not* to upgrade, let's hear it. I'm
> seriously curious as to why people don't want to.

You didn't ask for _good_ reasons, so here goes:

- laziness
  It's too much work
- incompetence
  No one around knows how to install Perl (even though it's as simple as
  can be
- legacy
  Tons and tons of scripts around that were written for perl 4, and they
  don't always immediately run under 5. it's normally trivial to fix,
  but still
- If it ain't broke, why fix it?
  That sort of attitude is very common. And totally misguided. If
  anything, this whole Y2K thing has finally made clear that if it ain't
  broke today, that doesn't mean it won't be broke tomorrow.
- no one cares
  The places that run perl 4 typically have no one around who regularly
  programs in Perl.

Like I said, not one good reason. But these are the ones that I have
experienced or heard of. And it's not limited to Perl4/5. I've seen
people compile production level code with a compiler that had so many
outstanding unapplied patches that the thing was invisible under all the
stickers. And I've seen people run production level databases unmirrored
on disks that were more than 4 years old. Inertia is the biggest problem
here, incompetence the second biggest.

Martien
-- 
Martien Verbruggen              | 
Interactive Media Division      | Useful Statistic: 75% of the people
Commercial Dynamics Pty. Ltd.   | make up 3/4 of the population.
NSW, Australia                  | 


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

Date: Sun, 07 Nov 1999 17:16:07 GMT
From: cberry@cinenet.net (Craig Berry)
Subject: Re: Perl4 and Y2K
Message-Id: <s2bcun432cl49@corp.supernews.com>

Simon Cozens (simon@othersideofthe.earth.li) wrote:
: Indeed. If there's a reason *not* to upgrade, let's hear it. I'm
: seriously curious as to why people don't want to.

The reason not to upgrade is basicaly "if it ain't broken, don't fix it." 
Some IT managers are unwilling to authorize changes to app-related
software without a proven need, and define 'proven need' as 'the vendor
says we *have* to'.  Since the 'vendor' concept for Perl is fuzzy, and
CERT advisories don't seem to carry much weight for some people, such
managers end up sticking with Perl 4. 

-- 
   |   Craig Berry - cberry@cinenet.net
 --*--  http://www.cinenet.net/users/cberry/home.html
   |   "They do not preach that their God will rouse them
      a little before the nuts work loose." - Kipling


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

Date: Sat, 6 Nov 1999 16:34:48 +0100
From: "Stefan Wobben" <wobben@dds.nl>
Subject: perlfunc manual
Message-Id: <801hpo$rcr$1@news.castel.nl>

Hello

Does someone has the perlfunc manual (zipped)

Yours sincerely

Stefan Wobben
s.wobben@multi-vision.nl




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

Date: 6 Nov 1999 10:28:17 -0600
From: abigail@delanet.com (Abigail)
Subject: Re: perlfunc manual
Message-Id: <slrn828m00.2i1.abigail@alexandra.delanet.com>

Stefan Wobben (wobben@dds.nl) wrote on MMCCLVIII September MCMXCIII in
<URL:news:801hpo$rcr$1@news.castel.nl>:
{} 
{} Does someone has the perlfunc manual (zipped)


It comes with Perl. If you have Perl, you have the manual. And not
just the perlfunc manual. All manuals. All 1200+ pages.



Abigail
-- 
sub camel (^#87=i@J&&&#]u'^^s]#'#={123{#}7890t[0.9]9@+*`"'***}A&&&}n2o}00}t324i;
h[{e **###{r{+P={**{e^^^#'#i@{r'^=^{l+{#}H***i[0.9]&@a5`"':&^;&^,*&^$43##@@####;
c}^^^&&&k}&&&}#=e*****[]}'r####'`=437*{#};::'1[0.9]2@43`"'*#==[[.{{],,,1278@#@);
print+((($llama=prototype'camel')=~y|+{#}$=^*&[0-9]i@:;`"',.| |d)&&$llama."\n");


  -----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
   http://www.newsfeeds.com       The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including  Dedicated  Binaries Servers ==-----


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

Date: Sat, 6 Nov 1999 16:30:22 -0500 
From: Ala Qumsieh <aqumsieh@matrox.com>
Subject: Re: perlfunc manual
Message-Id: <x3y7ljvs3yp.fsf@tigre.matrox.com>


"Stefan Wobben" <wobben@dds.nl> writes:

> Does someone has the perlfunc manual (zipped)

We all do. It should be installed somewhere in your system. You can
also get it from www.perl.com (click on 'Documentation' .. on the
left).

--Ala



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

Date: Mon, 08 Nov 1999 01:56:51 GMT
From: mgjv@comdyn.com.au (Martien Verbruggen)
Subject: Re: perlfunc manual
Message-Id: <D5qV3.109$AH5.4909@nsw.nnrp.telstra.net>

On 6 Nov 1999 10:28:17 -0600,
	Abigail <abigail@delanet.com> wrote:
> Stefan Wobben (wobben@dds.nl) wrote on MMCCLVIII September MCMXCIII in
> <URL:news:801hpo$rcr$1@news.castel.nl>:
> {} 
> {} Does someone has the perlfunc manual (zipped)
> 
> 
> It comes with Perl. If you have Perl, you have the manual. And not
> just the perlfunc manual. All manuals. All 1200+ pages.

Yes, but he wants them zipped.

Get the Compress::Zlib module from CPAN at http://www.cpan.org/

Martien
-- 
Martien Verbruggen              | 
Interactive Media Division      | I took an IQ test and the results
Commercial Dynamics Pty. Ltd.   | were negative.
NSW, Australia                  | 


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

Date: Sat, 06 Nov 1999 16:33:02 GMT
From: bababozorg@aol.com
Subject: Please help.....
Message-Id: <801l7v$lr8$1@nnrp1.deja.com>

hi
i have made a search script that display the results in a page and the
number of results displaying in one page can be variable, for example
20 hits per page.
also it counts the number of results and devides results into pages,
and it will write down the page number and a link to it.
below is what i have used to write down the devided pages and...
that i want to do is to any write doesn only 20 pages, and if anyone is
in the 20th page then they will see the greater number pages.
exactly what altavista.com has done. you only see the link to first 20
pages, and in the 20th page you will see the links to page 21 to 40
and...
i don't know how to do that using the code below.
can any one help please..
    $pagenumber=1;
    $hits = 20;
    $count = 1000;
    while ($count>=1){
        $cnt=0;
            while($cnt<$hits){
                $cnt++;
                if ($count>=1) {$count--;}
            }
        $pagein=$pagenumber;
        print qq~$pagein-~;
        $pagenumber++;
    }

thanks for your help
Hamed


Sent via Deja.com http://www.deja.com/
Before you buy.


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

Date: Sat, 06 Nov 1999 19:30:41 GMT
From: kragen@dnaco.net (Kragen Sitaker)
Subject: Re: Please help.....
Message-Id: <Bl%U3.48692$23.1839620@typ11.nn.bcandid.com>

In article <801l7v$lr8$1@nnrp1.deja.com>,  <bababozorg@aol.com> wrote:
>i have made a search script that display the results in a page and the
>number of results displaying in one page can be variable, for example
>20 hits per page.
>also it counts the number of results and devides results into pages,
>and it will write down the page number and a link to it.
>below is what i have used to write down the devided pages and...
>that i want to do is to any write doesn only 20 pages, and if anyone is
>in the 20th page then they will see the greater number pages.
>exactly what altavista.com has done. you only see the link to first 20
>pages, and in the 20th page you will see the links to page 21 to 40
>and...

The simplest way to do this is to run the search again every time
someone requests a page, and then give them hits N through M.  If you
like, you can cache search results for a while, but that's a little
more complicated.

For your links between pages, you want something like this:
sub print_pagelinks {
	my ($pageno) = @_;
	my $offset = $pageno % 20;
	my $base = $pageno - $offset;
	my $i;
	if ($base == 0) {  # display previous 20
		for $i ($pageno - 19 .. $pageno) {
			print_pagelink $i;
		}
	}
	for $i ($base+1 .. $base+20) {
		print_pagelink $i;
	}
}

This assumes 1-based page numbers -- i.e. first page is 1.

$pageno can be calculated by something like int($startinghit /
$hitsperpage) + 1, assuming zero-based hit numbers.

print_pagelink is going to be something like
sub print_pagelink {
	my ($pageno) = @_;
	my $startinghit = 1 + ($pageno-1) * $hitsperpage;
	print qq(<a href="$scripturl?$mostoptions&startinghit=$startinghit">$pageno</a>);
}

This approach has some disadvantages; it will suck up more CPU time and
it may produce more inconsistent results than using session-ids.  You
also don't have to worry about cleaning up old sessions.  Session-IDs
for this purpose are discussed in Randal's May 1996 Web Techniques
column, at http://www.stonehenge.com/merlyn/WebTechniques/col02.html.

Hope this helps some.  None of this code is tested, and I haven't ever
tried to build something like what you're talking about, so take this
with a spoonful of salt.
-- 
<kragen@pobox.com>       Kragen Sitaker     <http://www.pobox.com/~kragen/>
Tue Nov 02 1999
6 days until the Internet stock bubble bursts on Monday, 1999-11-08.
<URL:http://www.pobox.com/~kragen/bubble.html>


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

Date: Fri, 5 Nov 1999 06:46:23 -0800
From: Larry Rosler <lr@hpl.hp.com>
Subject: Re: Please Perl, do what I ask !!
Message-Id: <MPG.128c8d95d451873298a1b4@nntp.hpl.hp.com>

In article <19991105125209.1487.rocketmail@web219.mail.yahoo.com> on 
Fri, 5 Nov 1999 04:52:09 -0800 (PST), Mohammad Akram Ali Mehkri 
<mehkri@yahoo.com> says...
> >$ftp = Net::FTP->new($_[0], Timeout => 10, Port => $_[1]);
> 
> I think there should be no spaces arround " => " and the values should be iin
> quotes:

I think you should think more deeply before offering this kind of 
conjecture, and perhaps even test a snippet or two.

Perl is a 'free-form' language.  Spaces are relevant within strings and 
regexes and to separate ambiguous tokens, but not in lists such as the 
one shown above.

'=>' is a 'comma' that puts quotes around the preceding token if it is 
an identifier.  So the string values *are* in quotes.  And the numerical 
value and the variable values don't need to be.

> Secondly 
> Remember the great programming paradigm
> 
> 	Garbage In Garbage Out

Appropriate for your observation.
	
> Dont blame perl

How about blaming...

> mehkri

<SNIP> of more than 100 lines of quoted previous message.

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


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

Date: 5 Nov 1999 16:18:35 GMT
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Please Perl, do what I ask !!
Message-Id: <3823035b_2@newsread3.dircon.co.uk>

Mohammad Akram Ali Mehkri <mehkri@yahoo.com> wrote:
> Hi 
>>$ftp = Net::FTP->new($_[0], Timeout => 10, Port => $_[1]);
> 
> I think there should be no spaces arround " => " and the values should be iin
> quotes:

No thats not it. The '=>' operator implicitly quotes its RH operand and
the white space is irrelevant.

/J\
-- 
"Some saw Noel Edmonds as a stinking slimy downmarket local rep from a
package holiday firm. His critics were less kind" - Victor Lewis-Smith,
TV Offal


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

Date: Fri, 5 Nov 1999 09:31:36 -0800
From: Larry Rosler <lr@hpl.hp.com>
Subject: Re: Please Perl, do what I ask !!
Message-Id: <MPG.128cb454a43b6e798a1b7@nntp.hpl.hp.com>

[Posted and a courtesy copy mailed.]

In article <3823035b_2@newsread3.dircon.co.uk> on 5 Nov 1999 16:18:35 
GMT, Jonathan Stowe <gellyfish@gellyfish.com> says...
> Mohammad Akram Ali Mehkri <mehkri@yahoo.com> wrote:
> >>$ftp = Net::FTP->new($_[0], Timeout => 10, Port => $_[1]);
> > 
> > I think there should be no spaces arround " => " and the values should be iin
> > quotes:
> 
> No thats not it. The '=>' operator implicitly quotes its RH operand and
> the white space is irrelevant.

That may be so in the UK.  But around here the '=>' operator implicitly 
quotes its LH operand.  That is why I have never had the courage to 
drive in any of the Commonwealth countries -- people don't know their RH 
from their LH.  :-)

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


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

Date: Fri, 5 Nov 1999 17:02:39 -0500 
From: Ala Qumsieh <aqumsieh@matrox.com>
Subject: Re: Please Perl, do what I ask !!
Message-Id: <x3y904csikg.fsf@tigre.matrox.com>


Mohammad Akram Ali Mehkri <mehkri@yahoo.com> writes:

> Hi 
> >$ftp = Net::FTP->new($_[0], Timeout => 10, Port => $_[1]);
> 
> I think there should be no spaces arround " => " and the values should be iin
> quotes:

What are you talking about? Did you actually test (as opposed to
"think") what you are claiming?

--Ala



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

Date: Fri, 05 Nov 1999 15:44:31 GMT
From: slavinger@my-deja.com
Subject: pod2html problems
Message-Id: <7vuu0e$q9l$1@nnrp1.deja.com>

Hello,

I'm using Perl '5.005_02 built for sun4-solaris', and having a problem
with pod2html.  Here's an example of raw POD:

=head1 RETURN VALUES

=over 6

=item 0

Everything is OK

=item 1

Something happened

=back

Now, if I run pod2html on the file containing this pod, the "return
values" list starts at 1!  Essentially, pod2html doesn't pay attention
to the actual numeric items in pod (0 and 1), but it unconditionally
generates a numbered list in HTML (<OL> tag).  Is this a known problem?
The issue does not arise with non-numeric items.

Thanks.


Sent via Deja.com http://www.deja.com/
Before you buy.


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

Date: Sun, 7 Nov 1999 22:11:32 -0000
From: "Miguel de Melo" <miguel@delirio.demon.co.uk>
Subject: pop mail
Message-Id: <942012787.25708.0.nnrp-09.9e983e4d@news.demon.co.uk>

does anyone know where can i find a Pop3 mail program FREE to be able to
read my mail via a browser from any server.?

Thanks
Miguel




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

Date: Sun, 07 Nov 1999 23:31:13 GMT
From: michel.dalle@usa.net (Michel Dalle)
Subject: Re: pop mail
Message-Id: <805259$nc5$1@nickel.uunet.be>

In article <942012787.25708.0.nnrp-09.9e983e4d@news.demon.co.uk>, "Miguel de Melo" <miguel@delirio.demon.co.uk> wrote:
>does anyone know where can i find a Pop3 mail program FREE to be able to
>read my mail via a browser from any server.?

Install the following CGI script on your webserver and try it out :

#!/usr/local/bin/perl -w 
# --> adapt to your path to perl !
#
# findit.cgi
#
# Find a Pop3 mail program FREE to be able to
# read my mail via a browser from any server
# 
print "Location: 
http://cgi.resourceindex.com/Programs_and_Scripts/Perl/Web_Based_E_Mail/\n\n";
exit;

If you have trouble getting this to run, please send your questions to 
comp.infosystems.web.authoring.cgi

>Thanks
>Miguel

My pleasure,

Michel.


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

Date: Sun, 07 Nov 1999 23:50:22 GMT
From: amir142@my-deja.com
Subject: Re: pop mail
Message-Id: <80537t$tb0$1@nnrp1.deja.com>

try AtDot: http://www.atdot.org

or if you want to install it on your server try:
MailMan: http://www.endymion.com/products/mailman/

it's written in Perl

amir

In article <942012787.25708.0.nnrp-09.9e983e4d@news.demon.co.uk>,
  "Miguel de Melo" <miguel@delirio.demon.co.uk> wrote:
> does anyone know where can i find a Pop3 mail program FREE to be able
to
> read my mail via a browser from any server.?
>
> Thanks
> Miguel
>
>


Sent via Deja.com http://www.deja.com/
Before you buy.


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

Date: 7 Nov 1999 21:47:41 -0600
From: abigail@delanet.com (Abigail)
Subject: Re: pop mail
Message-Id: <slrn82ci5q.lh6.abigail@alexandra.delanet.com>

Miguel de Melo (miguel@delirio.demon.co.uk) wrote on MMCCLIX September
MCMXCIII in <URL:news:942012787.25708.0.nnrp-09.9e983e4d@news.demon.co.uk>:
&& does anyone know where can i find a Pop3 mail program FREE to be able to
&& read my mail via a browser from any server.?


From any server? I don't think so, unless you have accounts on all
servers outthere.

Now, what has this to do with Perl, or even computer languages in
general?


Abigail
-- 
sub A::TIESCALAR{bless\my$x=>A};package B;@q=qw/Hacker Another
Perl Just/;use overload'""'=>sub{pop @q};sub A::FETCH{bless\my
$y=>B}; tie my $shoe => 'A';print "$shoe $shoe $shoe $shoe\n";


  -----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
   http://www.newsfeeds.com       The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including  Dedicated  Binaries Servers ==-----


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

Date: Mon, 8 Nov 1999 09:38:35 +0100
From: "John Everitt" <john.everitt@best.ms.philips.com>
Subject: porting ksh to perl
Message-Id: <942072103.59032@mmisg1.best.ms.philips.com>

We currently have a number of ksh scripts that we would like to port to perl
and I was wondering whether anybody knew of any automated methods for doing
this conversion.

Thanks for any suggestions,

John Everitt
Philips Medical Systems
The Netherlands




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

Date: Fri, 05 Nov 1999 14:18:13 GMT
From: cpierce1@ford.com (Clinton Pierce)
Subject: Re: POST syntax problem...
Message-Id: <3824e5de.2669716779@news.ford.com>

[poster cc'd in e-mail]

On Fri, 05 Nov 1999 12:42:28 GMT, mbarieux2225@my-deja.com wrote:
>$req = POST 'http://something',
[ field-titledesc => $param1, index => $param2, field-geo =>  $param3 ];

The rule is, on the left-hand-side of a =>, you can use simple strings.
It's a syntactic shorthand so you won't get tired of typing 'foo'=> all
the time and can just say foo=>.

It's not perfect, it's not meant to be.

>Perl seems to have a problem with the syntax of the parameter names,
>because I have the following message :
>Ambiguous use of index => resolved to "index" => at
>/usr/local/etc/httpd/cgi-bin/test.pl line 24.

index is also a built-in function name in Perl.  This warning is correct.
Put index in quotes if you don't want to see this.

>Unquoted string "field" may clash with future reserved word at
>/usr/local/etc/httpd/cgi-bin/test.pl line 24.

field-titledesc is, to perl, something that looks like subtraction.  It's
not a simple string, and can't be used without quotes on the
left-hand-side of a =>.

>Argument "geo" isn't numeric in subtract at /usr/local/etc/httpd/cgi-
>bin/test.pl line 24.
>Argument "field" isn't numeric in subtract at /usr/local/etc/httpd/cgi-
>bin/test.pl line 24.

See!

>I tried to quote them like :
>$req = POST 'http://something',
>	[ "field-titledesc" => $param1, "index" => $param2, "field-geo"
>=> $param3 ];
>but it didn't work. Is there a way to achieve that with these parameter
>names ?

That should work (use single-quotes though ''), unless you have other bugs
not readily apparent.


-- 
   Clinton A. Pierce       "If you rush a Miracle Man, you
 clintp@geeksalad.org       get rotten Miracles."  -- Miracle Max,
http://www.geeksalad.org                       The Princess Bride


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

Date: Fri, 05 Nov 1999 17:36:37 +0100
From: Alex Rhomberg <rhomberg@ife.ee.ethz.ch>
Subject: Re: POST syntax problem...
Message-Id: <38230795.C79BF10@ife.ee.ethz.ch>

mbarieux2225@my-deja.com wrote:
> 
> Hi,
> I need to submit a form which has the following fields:
> field-titledesc, index, field-geo
> I wrote something like :
> I tried to quote them like :

> $req = POST 'http://something',
>         [ "field-titledesc" => $param1, "index" => $param2, "field-geo"
> => $param3 ];
> but it didn't work.

Didn't work. The most frequent error message on this newsgroup.

After checking the appropriate manuals, I'm sure you found out that you
are constructing a ref to an anonymous array containing
("field-titledesc", $param1, "index", $param2, "field-geo", $param3)

are you sure you want this and not a hash or a hash ref instead?
For a hash, look into perldata and use parens, for a hash ref, check
perlref and use curlies.

- Alex

~:> ./huge_script.pl
huge_script.pl doesn't work. Exiting.
~:>


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

Date: 6 Nov 1999 12:29:09 -0000
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: POST syntax problem...
Message-Id: <8016ul$ac0$1@gellyfish.btinternet.com>

On Fri, 05 Nov 1999 12:42:28 GMT mbarieux2225@my-deja.com wrote:
> Hi,
> I need to submit a form which has the following fields:
> field-titledesc, index, field-geo
> I wrote something like :
> 
> $ua = new LWP::UserAgent;
> $param1 = param('param1');
> $param2 = param('param2');
> $param3 = param('param3');
> $res = $ua->request($req);
> $strAntwort = $res->content;
> print $strAntwort;
> $req = POST 'http://something',
> 	[ field-titledesc => $param1, index => $param2, field-geo =>
> $param3 ];
> 

Others have covered the reason for the errors you are getting - but this
code snippet will still not work because you are assigning to $req after
you have used it in the request - unless of course there is some other
code that we have not been shown.

/J\
-- 
Jonathan Stowe <jns@gellyfish.com>
<http://www.gellyfish.com>
Hastings: <URL:http://dmoz.org/Regional/UK/England/East_Sussex/Hastings>


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

Date: 6 Nov 1999 21:13:19 -0000
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Premature End Of Script Headers
Message-Id: <8025lf$bot$1@gellyfish.btinternet.com>

On Wed, 03 Nov 1999 21:58:39 GMT Marcel Grunauer wrote:
> On Tue, 02 Nov 1999 23:46:57 GMT, kragen@dnaco.net (Kragen Sitaker)
> wrote:
> 
>> In article <ZEMfOOVhwxRIiVD=iIjFK5nUPin=@4ax.com>,
>> Marcel Grunauer  <marcel.grunauer@lovely.net> wrote:
>> >
>> >That sounds like an Abigailism :-)
>> 
>> Wow.  Abigail actually followed up to the same post and responded
>> exactly the same way, except that she didn't point lovely Marcel at the
>> Idiot's Guide.
> 
> Ahem, but *I* didn't actually ask the original question... But the
> comment wasn't meant to be disparaging, quite the opposite.
> 

Yeah but your name does begin with an 'M the same as the original poster ...

/J\
-- 
Jonathan Stowe <jns@gellyfish.com>
<http://www.gellyfish.com>
Hastings: <URL:http://dmoz.org/Regional/UK/England/East_Sussex/Hastings>


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

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


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