Installing modules

2002-12-03 Thread Marco Centemeri
Hello All, I'm trying to install on win2000 the following modules: IO::Stringy MailTools The command 'perl makefile.pl' works but then when I run dmake I always get the following error: 'Expecting macro or rule defn, found neither' See below snippet of command lines -> *** D:\temp\IO-stringy

f

2002-12-03 Thread Daniel Falkenberg

Re: wildcards in Windows

2002-12-03 Thread John W. Krahn
Bryan Harris wrote: > > I'm sure this has been answered before, but I can't seem to find an answer. > > Windows doesn't seem to want to expand wildcards before passing arguments to > my script. For example, typing: > > fixNCcode P* > > Passes 'P*' to my script instead of all files that start

Re: Problem with coverage

2002-12-03 Thread Rajanikanth Dandamudi
Paul, perl -V on my machine gives : Summary of my perl5 (revision 5.0 version 8 subversion 0) configuration: Platform: osname=solaris, osvers=2.7, archname=sun4-solaris uname='sunos apdsparc136 5.7 generic_106541-17 sun4u sparc ' config_args='' hint=recommended, useposix=true, d

perl 5.8 problem

2002-12-03 Thread V V Raja Rao
Hi, I have downloaded a simple http proxy from the net and using it with perl 5.8. When my browser sends a request to the perl proxy, the proxy gives the following error and doesn't process the request. -- socket: Invalid argument at proxy.pl line 194, line 1. -- It used to work fine with pel

RE: Case Insensitive

2002-12-03 Thread david
Jenda Krynicky wrote: > Better, but still incorrect. Glad that you point this out! :-) I always make that kind of mistake! david -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

wildcards in Windows

2002-12-03 Thread Bryan Harris
I'm sure this has been answered before, but I can't seem to find an answer. Windows doesn't seem to want to expand wildcards before passing arguments to my script. For example, typing: fixNCcode P* Passes 'P*' to my script instead of all files that start with "P". Is there a workaround? H

RE: Joining with a basic question

2002-12-03 Thread Timothy Johnson
Ok, that makes a lot more sense. Thanks for the clarification. -Original Message- From: Rob Dixon [mailto:[EMAIL PROTECTED]] Sent: Tuesday, December 03, 2002 5:21 AM To: Timothy Johnson; [EMAIL PROTECTED] Subject: Re: Joining with a basic question Timothy select() returns the original

Thanks for the help: query a ph nameserver plus backtick question

2002-12-03 Thread Brian Engleton
Thank you to everyone who helped out with my questions and directing me to the proper references. Thanks Matt for the pipe tip too. brian > > Are backticks bad, and if so what are the alternatives if I need to > return information to a variable? They're not as "cross platform" as using pure Pe

Thanks for the help: query a ph nameserver plus backtick question

2002-12-03 Thread Brian Engleton
Thank you to everyone who helped out with my questions and directing me to the proper references. Thanks Matt for the pipe tip too. brian > > Are backticks bad, and if so what are the alternatives if I need to > return information to a variable? They're not as "cross platform" as using pure Pe

Equivilence not working (forget it)

2002-12-03 Thread Paul Murphy
Don't bother. I have just seen exactly how stupid I am. "multipart" will never match "multitype". == This is driving me nuts! Look at this: if(/Content-Type:\s*(.+)\/(.+);/) { $content = $1; $subtype = $2; print $content; #this returns "multitype" print "1match $1\n"

Equivilence not working

2002-12-03 Thread Paul Murphy
This is driving me nuts! Look at this: if(/Content-Type:\s*(.+)\/(.+);/) { $content = $1; $subtype = $2; print $content; #this returns "multitype" print "1match $1\n" if $1 eq $content; print "2match $1\n" if $1 eq "multitype"; print "3match $1\n" if $content eq "multitype"; } If

Re: a Bug in PERL

2002-12-03 Thread Jenda Krynicky
From: Paul Johnson <[EMAIL PROTECTED]> > On Tue, Dec 03, 2002 at 04:40:37PM +0100, Jenda Krynicky wrote: > > [ Rearranging slightly to get your summary first ] > > > The documentation says you should not do it. Not because it would be > > that hard to say what happens (once you understand what di

moving a large hash to a library and using data from args to populate it

2002-12-03 Thread Ian Zapczynski
Hello all, I am writing a script which requires that a very large multi-level hash be populated at the start. I am trying to write something somewhat efficient so I can use a somewhat small loop to do a whole lot of work. Unfortunately, the size of the hash makes my script look rather ugly,

Re: a Bug in PERL

2002-12-03 Thread Paul Johnson
On Tue, Dec 03, 2002 at 04:40:37PM +0100, Jenda Krynicky wrote: [ Rearranging slightly to get your summary first ] > The documentation says you should not do it. Not because it would be > that hard to say what happens (once you understand what did I say > above), but because it would be easy to

RE: Floating point errors in Perl

2002-12-03 Thread Bob Showalter
> -Original Message- > From: Ed Christian [mailto:[EMAIL PROTECTED]] > Sent: Tuesday, December 03, 2002 3:46 PM > To: [EMAIL PROTECTED] > Subject: Floating point errors in Perl > > > Question for the masses: > > I have a script which iterates through percentiles, > ostensibly starting >

RE: Case Insensitive

2002-12-03 Thread Jenda Krynicky
From: david <[EMAIL PROTECTED]> > Dylan Boudreau wrote: > > > I could be wrong here as I am still pretty new to perl but couldn't > > you just do it like this > > > > if ($x =~ /$y/i) > > > > Dylan > > > > almost correct! :-) how about: > > if($x =~ /^$y$/i) > > your reg. only checks to see

Floating point errors in Perl

2002-12-03 Thread Ed Christian
Question for the masses: I have a script which iterates through percentiles, ostensibly starting at the 0th percentile and working up to the 100th percentile. I'd like the script to basically go as follows: my $increment = 0.01; my $percentile = 0.01; while ($percentile < 1.00) { print "$perce

RE: Case Insensitive

2002-12-03 Thread david
Dylan Boudreau wrote: > I could be wrong here as I am still pretty new to perl but couldn't you > just do it like this > > if ($x =~ /$y/i) > > Dylan > almost correct! :-) how about: if($x =~ /^$y$/i) your reg. only checks to see if $y is within $x, not equal. david -- To unsubscribe, e-m

Re: a Bug in PERL

2002-12-03 Thread david
Pradeep Goel wrote: > $ in NO case a language changes its behaviour for an array with 1 > element > & the same code with array of 2 or more elements ( what the PERL is doing > here ) > it does pops out if last element also happens to be the only element of > array. >> You are correct tha

Re: Problem with coverage

2002-12-03 Thread Paul Johnson
[ Please note followups set to perl-qa, perl-qa-metrics is pretty much dead ] On Tue, Dec 03, 2002 at 07:45:04PM +0530, Rajanikanth Dandamudi wrote: > Paul, > > I had downloaded the Devel::Cover module form the URL > http://search.cpan.org/author/PJCJ/Devel-Cover-0.20/ and trying to get > the co

Re: Var's in extern file

2002-12-03 Thread Todd W
"Beau E. Cox" <[EMAIL PROTECTED]> wrote in message [EMAIL PROTECTED]">news:[EMAIL PROTECTED]... > Hi - > > Perl is not like a typical compiled language, for example, c/c++. > It really doesn't have the typical 'include' functionality. > The 'use' and 'require' keywords are for 'including' perl > m

Re: Hash Access Query

2002-12-03 Thread Todd W
"Ben Crane" <[EMAIL PROTECTED]> wrote in message [EMAIL PROTECTED]">news:[EMAIL PROTECTED]... > Hi, > > right, my first attempt at a hash of arrays appears to > have some success...but I have a query: > > sub HoA > { > foreach $arb (@uniqueroadname) > { > foreach $doublearb (@contents) > { > if ($

Re: Writing a HTTP server with PERL

2002-12-03 Thread George Schlossnagle
LRMK wrote: >Thanks it solved my problem >I read a HTTP request from my browser (IE 6) >using a small program which listens to port 80 >i got this > >GET /perl/lib/Pod/perlfunc.html HTTP/1.1 >Accept: image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, >application/vnd.ms-excel, application/vnd.m

Re: Writing a HTTP server with PERL

2002-12-03 Thread LRMK
Thanks it solved my problem I read a HTTP request from my browser (IE 6) using a small program which listens to port 80 i got this GET /perl/lib/Pod/perlfunc.html HTTP/1.1 Accept: image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, application/vnd.ms-excel, application/vnd.ms-powerpoint, applica

Re: a Bug in PERL

2002-12-03 Thread Jenda Krynicky
> > PRADEEP GOEL said: > > > If i am not wrong somewhere , there is a bug come to my notice , > > > in PERL > > > > > > @lastnotpop = > > > ("where_gone_me","remaining_is_alright","no_fear_now"); foreach > > > $faltu (@lastnotpop) #$faltu is extra doesn't makes difference > > > even if removed { $

Re: a Bug in PERL

2002-12-03 Thread Jenda Krynicky
From: "PRADEEP GOEL" <[EMAIL PROTECTED]> > $ in NO case a language changes its behaviour for an array > with 1 element & the same code with array of 2 or more elements ( what > the PERL is doing here ) it does pops out if last element also happens > to be the only element of array. Differ

Re: Problem with coverage

2002-12-03 Thread Rajanikanth Dandamudi
Paul, I had downloaded the Devel::Cover module form the URL http://search.cpan.org/author/PJCJ/Devel-Cover-0.20/ and trying to get the coverage for a program. I had installed the Devel::Cover module and here is what I had done: * I am using the perl version 5.8.0 . The command I had given is :

Re: a Bug in PERL

2002-12-03 Thread wiggins
> > > I am really sorry if I am appearing offensive , > I never meant to be . Nope just curious I take it... > In perlsyn documen it does says " Don't do that " else it will get " > confused" > & quite below it says a C programmer does this - while same can be written > in perl as this > ( a

Re: Case Insensitive

2002-12-03 Thread wiggins
The first proposed solution: if ($x =~ /$y/i) is not remotely the same as the 'eq' solution. $x = 'OkOk'; $y = 'ok'; This will match and clearly they are not the same. A better one would be: if ($x =~ /^$y$/) But even this has its problems, $x = 'ok'; $y = '(ok|notok)'; Will still match, bu

RE: Perl up and down arrows

2002-12-03 Thread Bob Showalter
> -Original Message- > From: Sarath Palety [mailto:[EMAIL PROTECTED]] > Sent: Tuesday, December 03, 2002 5:37 AM > To: '[EMAIL PROTECTED]' > Subject: Perl up and down arrows > > > Hi all, > > I am trying to write a script for a Nortel Networks Baystack > 450 switch, > using the telnet m

RE: Perl up and down arrows

2002-12-03 Thread Sarath Palety
I will definitely give it a try and let you know how it goes. Thanks for your help. Cheers, Sarath -Original Message- From: Rob Dixon [mailto:[EMAIL PROTECTED]] Sent: 03 December 2002 13:25 To: Palety, Sarath [MDN05:2780:EXCH]; [EMAIL PROTECTED] Subject: Re: Perl up and down arrows

Re: a Bug in PERL

2002-12-03 Thread Rob Dixon
- Original Message - From: "PRADEEP GOEL" <[EMAIL PROTECTED]> To: "Paul Johnson" <[EMAIL PROTECTED]> Cc: <[EMAIL PROTECTED]> Sent: Tuesday, December 03, 2002 12:57 PM Subject: Re: a Bug in PERL > > > > Patient: Doctor, it hurts when I raise my arm. > > Doctor: Well, don't do that then

RE: Case Insensitive

2002-12-03 Thread Beau E. Cox
Ain't perl great? There are always at least 58 ways to do anything/everthing! :) Aloha => Beau. -Original Message- From: Rob Dixon [mailto:[EMAIL PROTECTED]] Sent: Tuesday, December 03, 2002 3:41 AM To: Dylan Boudreau; [EMAIL PROTECTED] Subject: Re: Case Insensitive That would work fine

Re: query a ph nameserver plus backtick question

2002-12-03 Thread Rob Dixon
How about Net::PH ?? Rob - Original Message - From: "Beau E. Cox" <[EMAIL PROTECTED]> To: <[EMAIL PROTECTED]>; <[EMAIL PROTECTED]> Sent: Monday, December 02, 2002 8:59 PM Subject: RE: query a ph nameserver plus backtick question > Hi- > > A quick look at CPAN didn't reveal any modul

Re: a Bug in PERL

2002-12-03 Thread PRADEEP GOEL
- Original Message - From: "PRADEEP GOEL" <[EMAIL PROTECTED]> To: "Paul Johnson" <[EMAIL PROTECTED]> Cc: <[EMAIL PROTECTED]> Sent: Tuesday, December 03, 2002 6:27 PM Subject: Re: a Bug in PERL > > - Original Message - > From: "Paul Johnson" <[EMAIL PROTECTED]> > To: <[EMAIL PROTE

RE: Case Insensitive

2002-12-03 Thread Beau E. Cox
Or, you could: if (lc $x eq lc $y) { ... } lc changes to lower case. Aloha => Beau. -Original Message- From: SATAR VAFAPOOR [mailto:[EMAIL PROTECTED]] Sent: Tuesday, December 03, 2002 3:27 AM To: [EMAIL PROTECTED] Subject: Case Insensitive Hello all, I want to make comaprisons in an

Problems installing perl 5.6.1 on HP-UX 11.00

2002-12-03 Thread Carlos Barroso
Hy there. I'm having problemas installing perl 5.6.1 (source) on HP-UX 11.00 When I did my first "make" I got the following error: Bad character > (octal 76), line 679Make: . Stop. I thought it could be because of the "make" binary, so I installed the "gmake" depot and got the following

Re: Case Insensitive

2002-12-03 Thread Rob Dixon
That would work fine, or you could change both to the same case for the duration of the comparison: if ( "\U$x" eq "\U$y" ) Rob - Original Message - From: "Dylan Boudreau" <[EMAIL PROTECTED]> To: <[EMAIL PROTECTED]> Sent: Tuesday, December 03, 2002 1:30 PM Subject: RE: Case Insensit

Re: Case Insensitive

2002-12-03 Thread Nigel Wetters
On Tue, 2002-12-03 at 13:26, SATAR VAFAPOOR wrote: > I want to make comaprisons in an if statement without caring > about upper or lower case eg $x='T'; $y='t' if($x eq $y). can > the i that is used in regex be used here or is there another way. Simplest way is to convert both to lower case, u

Re: a Bug in PERL

2002-12-03 Thread Paul Johnson
PRADEEP GOEL said: >> > & also that any programming language must follow some sure >> mathematical >> > rules & should not get confused . >> >> The rule is "don't do that". Most languages have rules like that for >> various situations. In C, for example, a statement such as i = i++ is >> unede

RE: Case Insensitive

2002-12-03 Thread Dylan Boudreau
I could be wrong here as I am still pretty new to perl but couldn't you just do it like this if ($x =~ /$y/i) Dylan -Original Message- From: SATAR VAFAPOOR [mailto:[EMAIL PROTECTED]] Sent: December 3, 2002 9:27 AM To: [EMAIL PROTECTED] Subject: Case Insensitive Hello

Case Insensitive

2002-12-03 Thread SATAR VAFAPOOR
Hello all, I want to make comaprisons in an if statement without caring about upper or lower case eg $x='T'; $y='t' if($x eq $y). can the i that is used in regex be used here or is there another way. Thanks Sattar - Do you Yahoo!? Yahoo! Mail Plus - Powerful

Re: Perl up and down arrows

2002-12-03 Thread Rob Dixon
Hi Sarath Your switch probably expects ANSI escape sequences for cursor control. You might take a look at module ANSIScreen to see if it does what you need; I've got no experience with it though. Cheers, Rob - Original Message - From: "Sarath Palety" <[EMAIL PROTECTED]> To: <[EMAIL PRO

Re: Joining with a basic question

2002-12-03 Thread Rob Dixon
Timothy select() returns the original output filehandle that was in force before the new one is selected. That means that ( select( STDOUT ), $| = 1 ) is the same as ( oldfilehandle, 1 ) so select ( ( select( STDOUT ), $| = 1 )[0] ) is the same as select ( oldfilehandle ) i

RE: $_ @_ and others

2002-12-03 Thread Duarte Cordeiro
Thanks for your reply :) I think we're just saying the same thing. Perl lets you do a lot, but it's on the programmer's back the responsibility to do the correct thing(TM). Regards, Duarte -Original Message- From: Paul Johnson [mailto:[EMAIL PROTECTED]] Sent: Tuesday, December 03, 20

Re: $_ @_ and others

2002-12-03 Thread Rob Dixon
Nicely explained Paul. :-)) Cheers, Rob - Original Message - From: "Paul Johnson" <[EMAIL PROTECTED]> To: <[EMAIL PROTECTED]> Cc: <[EMAIL PROTECTED]> Sent: Tuesday, December 03, 2002 11:26 AM Subject: Re: $_ @_ and others > > Well, it's true, Perl gives you more than enough rope with w

Re: a Bug in PERL

2002-12-03 Thread PRADEEP GOEL
- Original Message - From: "Paul Johnson" <[EMAIL PROTECTED]> To: <[EMAIL PROTECTED]> Cc: <[EMAIL PROTECTED]> Sent: Tuesday, December 03, 2002 5:13 PM Subject: Re: a Bug in PERL > > PRADEEP GOEL said: > > > > - Original Message - > > From: "Paul Johnson" <[EMAIL PROTECTED]> > > T

Re: a Bug in PERL

2002-12-03 Thread Paul Johnson
PRADEEP GOEL said: > > - Original Message - > From: "Paul Johnson" <[EMAIL PROTECTED]> > To: <[EMAIL PROTECTED]> > Cc: <[EMAIL PROTECTED]> > Sent: Monday, December 02, 2002 5:01 PM > Subject: Re: a Bug in PERL > > >> >> PRADEEP GOEL said: >> > If i am not wrong somewhere , there is a bug c

Re: $_ @_ and others

2002-12-03 Thread Paul Johnson
Duarte Cordeiro said: > I don't know if is just us in here, but perl seems to "help" programmers > make fuzzy and hard to understand scripts. > but why use $_ or even nothing ( because almost every function can use > $_ by default)? if I have a problem in a script, and I see a $_, I > just hav

RE: Hash Access Query

2002-12-03 Thread Beau E. Cox
Hi Ben - I have three general suggestions: use strict; use strict; use strict; 'strict' forces you to pre-define your variables; it makes the code more readable, AND will save you many times over from misspelling errors (when this happens, perl merrily creates a new varia

Perl up and down arrows

2002-12-03 Thread Sarath Palety
Hi all, I am trying to write a script for a Nortel Networks Baystack 450 switch, using the telnet module. Unfortunately the switch uses a menu structure that requires up and down arrows. I was wondering if any of you knew how to send the up and down arrows either throught the telnet module or th

Re: Writing a HTTP server with PERL

2002-12-03 Thread Rob Dixon
Hi Weijie. See in-line. - Original Message - From: "Weijie Ding" <[EMAIL PROTECTED]> To: "LRMK" <[EMAIL PROTECTED]>; <[EMAIL PROTECTED]> Sent: Tuesday, December 03, 2002 2:54 AM Subject: Re: Writing a HTTP server with PERL > Hi, LRMK, 2002-12-03 10:52:27 > > I think it is not your fault

Hash Access Query

2002-12-03 Thread Ben Crane
Hi, right, my first attempt at a hash of arrays appears to have some success...but I have a query: sub HoA { foreach $arb (@uniqueroadname) { foreach $doublearb (@contents) { if ($doublearb =~ m|$arb|) { print "$arb $doublearb\n"; push @temparray, $doublearb; } } } $arrayref{$arb} = [@temp

RE: Joining with a basic question

2002-12-03 Thread Timothy Johnson
Wow, and I thought mine was cryptic. Maybe you can explain exactly what you're doing here. I know that by setting $| to 1 you are setting the selected filehandle (STDOUT by default) to AutoFlush instead of buffering it, but I don't get the rest. It looks like you're saying this: select()

$_ @_ and others

2002-12-03 Thread Duarte Cordeiro
Hi all, I'm following this mailing list for a while. Also, we had a small project inhouse that had some components made in perl. It was developped by 3 diferent guys, so we shared some code. In the end, I was the one who glued everything. I don't know if is just us in here, but perl se