Verio, the world's largest ISP.
-Original Message-
From: Dave Cross [mailto:[EMAIL PROTECTED]]
Sent: Tuesday, May 14, 2002 12:37 PM
To: [EMAIL PROTECTED]
Subject: Re: Matt Wright's formMail
On Mon, 13 May 2002 16:07:54 +0100, Camilo Gonzalez wrote:
I've just been informned by my ISP
Hi everybody,
Is there any module can advise me to use for developing
image counter ?
Thank you very much,
Connie
Yay us! (I work for Verio)
Cheers,
Kevin
On Wed, May 15, 2002 at 08:40:45AM -0500, Camilo Gonzalez
([EMAIL PROTECTED]) said something similar to:
Verio, the world's largest ISP.
Can you please tell me which ISP this is. I'm tring to keep a list of
ISPs that have come to their senses and
On Wed, 15 May 2002 16:34:48 +0100, Camilo Gonzalez wrote:
I emailed Mr. Wright concerning the security oversights and the fact
Verio won't let me us his script anymore and have yet to hear from him.
How assholic can one get? Is he still alive? Does anyone know what he's
doing now?
To be
$sth = $dbh-prepare(select ID from maintenance);
this should read:
my($sth) = $dbh-prepare(select ID from maintenance);
That didn't seem to work for me for some reason.
Another question - how do I apply strict to the lines below. And how do I just avoid
the private or my declaration by
Somebody just said assholic. I like that word. Should it be used when
evaluating code? It could escalate something like this. :)
loose
unclear/uncommented
buggy/unstable
contains security flaws
completely unsafe
stupid
assholic
---
Outgoing
I use an authentication system for my site based on .htaccess,
where user passwords are stored, encrypted, in a database, and then
written to a passwd file regularly.
My problem is this:
When we were using a cookie system, we had a link in index.cgi that
displayed on the home page that said I am
Hey, this is cool. It's about time to update things around the universe.
-Original Message-
From: Camilo Gonzalez[EMAIL PROTECTED]
To: '[EMAIL PROTECTED]'[EMAIL PROTECTED], Camilo
Gonzalez[EMAIL PROTECTED]
Cc: [EMAIL PROTECTED]
Date: Mon May 13 08:17:47 PDT 2002
Subject: Re: Matt
-Original Message-
From: drieux [mailto:[EMAIL PROTECTED]]
{ did I mention that kids these days are just going to Python? }
It is definitely getting more press. I have never tried it but by all
accounts its a great language.
Harry
on Wed, 15 May 2002 03:53:20 GMT, [EMAIL PROTECTED] (Beau E. Cox)
wrote:
A recent poster asked for a way to get a list of drives on an
Win32 system.
Since I couldn't find a pure-perl way to do it,
Pure Perl: try them all :-)
#! perl
use strict;
my @driveletters =
Felix -
Good comment. I missed the GetLogicalDrives... But I did have fun writing
my first module!
Aloha - Beau.
-Original Message-
From: Felix Geerinckx [mailto:[EMAIL PROTECTED]]
Sent: Tuesday, May 14, 2002 11:22 PM
To: [EMAIL PROTECTED]
Subject: Re: Win32::Getdrives
on Wed,
hello everybody,
I have a little problem with if... it seems to be very simple but I just cannot
find a working solution
here the code - there must be sth wrong within the term. does anybody know a
solution?
my $speed_cost_code = '';
my $avg_speed =
on Wed, 15 May 2002 09:30:04 GMT, [EMAIL PROTECTED]
(Stefan Haberer) wrote:
if( 0 = $avg_speed = 5 ) { $speed_cost_code
You need
if ( 0 = $avg_speed $avg_speed = 5 ) { ... }
--
felix
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail:
on Wed, 15 May 2002 03:12:15 GMT, [EMAIL PROTECTED] (Drieux) wrote:
so you need to check that it is numeric...
so you could do it with say
if ( $val =~ /^\d+/ and $val 0 and $val 11) {
Not good enough.
$val = 3.141592654;
is perfectly numeric but fails your /^\d+/.
Felix:
Yea, I didn't manage to change that (but my POD is OK!)
By the by, do you (or anyone out there) know the politically-correct way to
distribute, make, and install a binary module (just the .lib and .dll) so
that people w/o c/c++ compilers (mainly Win32'ers) can install and
on Tue, 14 May 2002 20:00:05 GMT, [EMAIL PROTECTED] (Jeff
O'Connell) wrote:
I'm trying to figure out how to do the following in Perl. Can
anyone help me?
Problem:
Design and implement a perl program that will evaluate a
polynomial expression of arbitrary degree for a given value of x.
Hi,
I have a problem with perl-Tk. I downloaded Tk800.023 from cpan. I am
using RH7.3. I want to build tkperl static. I untared the archive, and
followed the INSTALL file as follows:
-
For static linking the following is how it is
Are there any tricks to time the execution of a sub?
Specifically I'm using the Fisher-Yates shuffle, using an array with a
couple of million numbers. I want to time the shuffle.
Tor
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
-Original Message-
From: Tor Hildrum [mailto:[EMAIL PROTECTED]]
Are there any tricks to time the execution of a sub?
Specifically I'm using the Fisher-Yates shuffle, using an array with a
couple of million numbers. I want to time the shuffle.
The module Benchmark. Drieux has got
-Original Message-
From: Beau E. Cox [mailto:[EMAIL PROTECTED]]
Sent: Tuesday, May 14, 2002 11:53 PM
To: [EMAIL PROTECTED]
Subject: Win32::Getdrives
Hi,
A recent poster asked for a way to get a list of drives
on an Win32 system.
Since I couldn't find a pure-perl way to
# Here's one way:
my $speed_cost_code = '';
if($avg_speed = 0 $avg_speed = 5) { $speed_cost_code =
A; }
elsif ($avg_speed 5 $avg_speed = 15) { $speed_cost_code =
B; }
elsif ($avg_speed 15 $avg_speed = 25) { $speed_cost_code =
C; }
# But I don't like
-Original Message-
From: patrick hall [mailto:[EMAIL PROTECTED]]
Sent: Wednesday, May 15, 2002 2:09 AM
To: [EMAIL PROTECTED]
Subject: A good place to tell CPAN to look?
Hi,
I've been trying really hard to get SOAP::Lite
installed, and I think the problem comes down to my
I have some little problems:
If I have a file,how can I say to cut a line where my pattern is matched?
And how can I cut just the word or what is matched?
How can I take just what is after the @ symbol(to know the dominion
contained in my file) to put it in an hashh ()to take each dominion one
-Original Message-
From: Felix Geerinckx [mailto:[EMAIL PROTECTED]]
Sent: Wednesday, May 15, 2002 5:22 AM
To: [EMAIL PROTECTED]
Subject: Re: Win32::Getdrives
...
there's always the 'GetLogicalDrives()' function in the
'Win32API::File' module.
Well, that'll teach me to read the
Please help me!
I'm going crazy!
It's perfect but I need something more.I need also the qw001234 with the
passwd that's in another file in format:
qw001234 rfvcde
And I want it for all lines of all files.
I'm obviously a beginner in perl so I don't know if it is possible.
Bye and many thanks
volks,
I do hope kevin will not mind that I take back onto the list
a bit of Kvetching about 'faster, better, cheaper' - the way
hot networking code - problem. This will get way Ugly and a bit
technical so relax, get a mug of yourBeverageDuJure and a
big cookie and curl up around the Fire as
On Wednesday, May 15, 2002, at 06:33 , drieux wrote:
volks,
sorry, but I forgot the simpler solution.
change plank's constant it theoretically can
speed things up a bit
ciao
drieux
---
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL
I don't know if my mail arrived because I did not subscribe.Now I've sent a
mail to [EMAIL PROTECTED] and I hope I'm ok.
My simple questions were:
How can I cut from a file a line where I match a word?
And how can I cut just the word matched?
I need to extract from a file what is after @(to
I don't know if my mail arrived because I did not subscribe.Now I've sent a
mail to [EMAIL PROTECTED] and I hope I'm ok.
My simple questions were:
How can I cut from a file a line where I match a word?
And how can I cut just the word matched?
I need to extract from a file what is after @(to
Hey all,
I posted this on perl-ntadmins@topica and it seems either I stumped
them or they are all still sleeping.
Any clues on a solution?
-Original Message-
From: Nikola Janceski
Sent: Wednesday, May 15, 2002 9:16 AM
To: '[EMAIL PROTECTED]'
Subject:
Could you please include how the input data looks like and how the outcome needs to be
!!
-Original Message-
From: Barbara Manfredini [mailto:[EMAIL PROTECTED]]
Sent: Wednesday, May 15, 2002 9:46 AM
To: [EMAIL PROTECTED]
Subject: Same help
I don't know if my mail arrived because I
Thanks everyone...Appreciate it!!
-Original Message-
From: Beau E. Cox [mailto:[EMAIL PROTECTED]]
Sent: Tuesday, May 14, 2002 11:53 PM
To: [EMAIL PROTECTED]
Subject: Win32::Getdrives
Hi,
A recent poster asked for a way to get a list of drives on an Win32 system.
Since I
On Wed, May 15, 2002 at 10:15:17AM -, Felix Geerinckx wrote:
$y = $a[0] + $a[1]*$x + ... + $a[$n-1]*$x**($n-1) + $a[n]*$x**$n;
This free Perl syntax should get you started.
(Note to regulars: the '...' is *not* the three-dot version of the
range operator :-)
Yepp, it's the long
I don't know if my mail arrived because I did not subscribe.Now I've sent a
mail to [EMAIL PROTECTED] and I hope I'm ok.
My simple questions were:
How can I cut from a file a line where I match a word?
- If I have a file with many lines,I want to cut the lines where the word
example(or a
Hi everybody,
Is there any method to write a file ( text / bin ) by random ?
just like what seek does.
Thank you very much,
Connie
I see a number of mails about Perl books. Most of them
mention the O'Reilly Books. Does anyone use Perl in a
Nutshell? Is it any good as a reference book?
I have this particular book, however I feel that a certain
amount of content rot has settled in. My version (latest?),
was printed in
The first two steps are fine. Problem is, when I come the next step:
[ot@papc-mag-17 Tk800.023]# make tkperl
make: *** No rule to make target `tkperl'. Stop.
Any ideas? Thanks in advance.
Verify you need this... usually everything is build with just 'make'.
If the documentation says you
Hi everybody,
Is there any module can advise me to use for developing
image counter ?
Thank you very much,
Connie
-Original Message-
From: Barbara Manfredini [mailto:[EMAIL PROTECTED]]
Sent: Wednesday, May 15, 2002 10:20 AM
To: [EMAIL PROTECTED]
Subject: Same help 2
I don't know if my mail arrived because I did not subscribe.Now I've sent a
mail to [EMAIL PROTECTED] and I hope I'm ok.
My simple
On Wednesday, May 15, 2002, at 06:32 , Francesco Guglielmo wrote:
qw001234 rfvcde
I think I see where the question got ambiguous for volks.
$line_from_ok = qw001234 rfvcde;
$line_from_Broken = qw001234po001234 ghjkldzx001234
tgbnhy;
and the problem is that this
On Wednesday, May 15, 2002, at 03:06 , Beau E. Cox wrote:
[..]
By the by, do you (or anyone out there) know the politically-correct
way to distribute, make, and install a binary module (just the .lib and
.dll) so that people w/o c/c++ compilers (mainly Win32'ers) can install
and use
Please help me!
I'm going crazy!
For cocoa puffs?
It's perfect but I need something more.I need also the
qw001234 with the
passwd that's in another file in format:
qw001234 rfvcde
And I want it for all lines of all files.
Of ALL files?
I'm obviously a beginner in perl so I don't
On Wednesday, May 15, 2002, at 04:51 , Tor Hildrum wrote:
Are there any tricks to time the execution of a sub?
Specifically I'm using the Fisher-Yates shuffle, using an array with a
couple of million numbers. I want to time the shuffle.
you want
perldoc Benchmark
if you would like
You're perfect!You answered me in a few minutes,fantastic.But there's a
problemme.I tried to use those script but nothing.I need to ask you some
more.Can you be more precise or do somethind simplier for a really beginner
in perl?Sorry for the time you loose for me.Bye
From: Shishir K.
On Wednesday, May 15, 2002, at 07:21 , Connie Chan wrote:
Hi everybody,
Is there any method to write a file ( text / bin ) by random ?
just like what seek does.
where you want to start is with
perldoc -f seek
since you will notice
a) that it exists
b) tell exists
%uid0s{$uid0} = ''; # each time through your loop
Should be:
$uid0s{$uid0} = ''; # till v6 *sigh*
-dave
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Can the get function in Net::FTP be used to get an entire directory? I know
the get function is used to retrieve a single file, but I need to retrieve
an entire directory. How can this be done? Thanks.
-Jose
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL
on Wed, 15 May 2002 13:57:49 GMT, [EMAIL PROTECTED]
(Nikola Janceski) wrote:
I don't know how to explain my problem, but I will try my best.
That's a strange way to start a question, especially when an
excellent explanation follows :-)
What I want:
I want to be able to get the list
On Wednesday, May 15, 2002, at 04:34 , Alan Drew wrote:
[..]
For static linking the following is how it is supposed to work
(I think, but I don't use static linking normally, this scheme
worked as far as this on one trial under SunOS4.)
perl Makefile.PL
make
make tkperl
make test #
-BEGIN PGP SIGNED MESSAGE-
Hash: SHA1
On Tuesday 14 May 2002 11:05 pm, Jim C. wrote:
There was a lot of stuff removed from Learning Perl 3rd Ed
Any comments from the gang on _Programming_ Perl 2nd ed v. 3rd ed?
Will I do myself irreparable harm studying from the older edition of
Just use Net::FTP to get a list of the files in the directory and store them
in an array, and then you can loop through it and get each file.
-Original Message-
From: Torres, Jose
To: '[EMAIL PROTECTED]'
Sent: 5/15/02 8:36 AM
Subject: Net::FTP question
Can the get function in Net::FTP
The Perl CD Bookshelf is an excellent resource too. Version 1 contained:
Perl in a Nutshell
Learning Perl
Learning Perl on Win32 Systems
Programming Perl
Advanced Perl Programming
Perl Cookbook
I think version 2 has even more. It's all on one CD, and has a great index
that indexes
on Wed, 15 May 2002 15:36:00 GMT, [EMAIL PROTECTED] (Jose Torres)
wrote:
Can the get function in Net::FTP be used to get an entire
directory? I know the get function is used to retrieve a single
file, but I need to retrieve an entire directory. How can this be
done? Thanks.
You can get a
Hi Drieux,
Hhhm, Unix rules, but we still need men :
make babies
Make: Don't know how to make babies. Stop.
Hope he didn't mess up someone elses test too much :)
Regs David
---
On Wednesday, May 15, 2002, at 04:34 , Alan Drew wrote:
[..]
For static linking the
On Wednesday, May 15, 2002, at 02:55 , Felix Geerinckx wrote:
on Wed, 15 May 2002 03:12:15 GMT, [EMAIL PROTECTED] (Drieux) wrote:
so you could do it with say
if ( $val =~ /^\d+/ and $val 0 and $val 11) {
Not good enough.
$val = 3.141592654;
is perfectly numeric but fails
On Wednesday, May 15, 2002, at 02:46 , Felix Geerinckx wrote:
on Wed, 15 May 2002 09:30:04 GMT, [EMAIL PROTECTED]
(Stefan Haberer) wrote:
if( 0 = $avg_speed = 5 ) { $speed_cost_code
You need
if ( 0 = $avg_speed $avg_speed = 5 ) { ... }
is there any issue with
I have numerous books, but I always suggest people look at The Perl CD
Bookshelf from O'Reilly. It contains the third edition of Programming Perl.
You'll have access to the combined resources of complete, unabridged
versions of Perl in a Nutshell, Perl Cookbook, Programming Perl, Perl for
System
Not that I know of, but you could throw it back to the list. I think
anything you found for doing that would essentially be doing the same thing
I just recommended, unless you're talking about launching each download in a
separate process or something.
-Original Message-
From: Torres,
Thanks for all the help!
[ot@papc-mag-17 Tk800.023]# make tkperl
make: *** No rule to make target `tkperl'. Stop.
Any ideas? Thanks in advance.
oh dear - you are chasing a phantom.
http://www.lns.cornell.edu/~pvhp/ptk/qna2.html
This link does not really help the matter:
Lastly, it
The only issue with using 'and' as I understand it is that it has a lower
precedence than , so sometimes you end up having to put in more
parentheses. I usually opt for using just so I know where I stand and
use parentheses and algorithmic contortions to make it say what I need.
On Wed, 2002-05-15 at 11:46, Robert Beau Link wrote:
-BEGIN PGP SIGNED MESSAGE-
Hash: SHA1
On Tuesday 14 May 2002 11:05 pm, Jim C. wrote:
There was a lot of stuff removed from Learning Perl 3rd Ed
Any comments from the gang on _Programming_ Perl 2nd ed v. 3rd ed?
Will I do
on Wed, 15 May 2002 15:50:56 GMT, [EMAIL PROTECTED] (Drieux) wrote:
On Wednesday, May 15, 2002, at 02:46 , Felix Geerinckx wrote:
You need
if ( 0 = $avg_speed $avg_speed = 5 ) { ... }
is there any issue with using 'and' one way or
the other
One keystroke.
--
felix
--
To
On Tuesday, May 14, 2002, at 03:37 , Kevin Meltzer wrote:
On Tue, May 14, 2002 at 02:44:01PM -0700, drieux ([EMAIL PROTECTED])
said something similar to:
Given that the Apocalypse is coming, you may want to wait
until the first of the Perl6 books come out - if you are
'book oriented', but
On Wed, 2002-05-15 at 11:50, drieux wrote:
On Wednesday, May 15, 2002, at 02:46 , Felix Geerinckx wrote:
on Wed, 15 May 2002 09:30:04 GMT, [EMAIL PROTECTED]
(Stefan Haberer) wrote:
if( 0 = $avg_speed = 5 ) { $speed_cost_code
You need
if ( 0 =
Some of the things mentioned on this list I have
never seen in Learning Perl
Learning Perl is just to get you started, and much of the stuff
discussed on this list goes well beyond that book. If you really get
into Perl and want to move to the next level I strongly suggest the
other
Hi
Now, I want to check if string or charcater is in the range. Can u please suggest
me something
Thanks
-
Do You Yahoo!?
LAUNCH - Your Yahoo! Music Experience
Hi ALL;
Ok I started this on the sunmanages list but I think it's come to a
head.
The problem.
We have a standard share of /var/opt/modules mounted by a few Solaris
machines 2.6-2.8. I have compiled the Solaris:Kstat module for all three
OS Revs and am trying to load the appropriate Module
Hi
sub harryGrep {
return [ grep { not $\{$_}++ } @_ ];
}
It took me quite a while to find something quicker than the original grep
using the function I first tried and then I happened across a piece of text
talking about return contexts and tried the above. I also
-Original Message-
From: Maureen E Fischer [mailto:[EMAIL PROTECTED]]
Rob
Boy, I'm glad to hear that. I finished Learning Perl and started to
read this list and thought I needed to find the Dumb as a door nail list
since I didn't
even understand most of the questions.
I think
Beta? Is isn't even alpha. And yes, generally when I speak of the
future it is in terms of sometime after the present.
Cheers,
Kevin
On Wed, May 15, 2002 at 09:07:28AM -0700, drieux ([EMAIL PROTECTED]) said something
similar to:
On Tuesday, May 14, 2002, at 03:37 , Kevin Meltzer wrote:
On Wednesday, May 15, 2002, at 08:15 , Barbara Manfredini wrote:
You're perfect!You answered me in a few minutes,fantastic.But there's a
problemme.I tried to use those script but nothing.I need to ask you
some more.Can you be more precise or do somethind simplier for a really
Hi all!
Do you know if there ist a perl implementation for suffix-trees and the ukkonen
algorithm?
Jane
Keine verlorenen Lotto-Quittungen, keine vergessenen Gewinne mehr!
Beim WEB.DE Lottoservice: http://tippen2.web.de/?x=13
I have written a script that searches through a directory and finds files
that are no longer needed - these files are actually image files - .jpg or
..gif extensions.
But how do I actually delete the unused files ?
Any help would be greatly appreciated
Thanks in advance
Anadi
PS: And
On Wed, 15 May 2002 16:43:14 + A Taylor [EMAIL PROTECTED] wrote:
I have written a script that searches through a directory and finds files
that are no longer needed - these files are actually image files - .jpg or
..gif extensions.
But how do I actually delete the unused files ?
-Original Message-
From: A Taylor [mailto:[EMAIL PROTECTED]]
I have written a script that searches through a directory and
finds files
that are no longer needed - these files are actually image
files - .jpg or
..gif extensions.
But how do I actually delete the unused files ?
To delete files, use unlink - just as you would in the Unix terminal:
e.g
[mag-17 scripts]$ perl -e ' unlink foo.bar '
this deletes the file foo.bar.
A.
On Wednesday, May 15, 2002, at 04:43 PM, A Taylor wrote:
I have written a script that searches through a directory and finds
files that
On Wednesday, May 15, 2002, at 08:57 , Alan Drew wrote:
[..]
oh dear - you are chasing a phantom.
http://www.lns.cornell.edu/~pvhp/ptk/qna2.html
This link does not really help the matter:
Lastly, it should be mentioned that if you build your perl/Tk statically
rather than dynamically
Check out the perlop manpage for lt,gt,le,ge, and eq. These are the string
equivalents of ,,=,=, and == respectively.
-Original Message-
From: Jaishree Rangaraj
To: [EMAIL PROTECTED]
Sent: 5/15/02 9:12 AM
Subject: Re:Question in perl syntax
Hi
Now, I want to check if string or
On Wednesday, May 15, 2002, at 09:12 , Jaishree Rangaraj wrote:
Hi
Now, I want to check if string or charcater is in the range. Can u
please suggest me something
http://www.wetware.com/drieux/pbl/perlTrick/RangeChecker.txt
but in that case you want to modify the
my
If there is, then it would most likely be found as a module on CPAN. Check
out http://search.cpan.org
-Original Message-
From: Dr. Christiane Nerz
To: [EMAIL PROTECTED]
Sent: 5/15/02 9:40 AM
Subject: no subject
Hi all!
Do you know if there ist a perl implementation for suffix-trees
Oops seems I 've made some confusion on my question...
What I am trying to do is like that...
LN0;T=1;C=2;B=1234567890
LN1;T=0;C=3;B=AABBBCCC
LN2;T=0;C=4;B=0987654321
(something like that in same structure)
What I wish to is able to write to any 'block' / 'segment' on demand...
All what I
@filelist = your_search_script_result();
for (@filelist) { unlink ($_) }
- Original Message -
From: A Taylor [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Thursday, May 16, 2002 12:43 AM
Subject: How do I delete a file
I have written a script that searches through a directory and
On Wednesday, May 15, 2002, at 09:16 , scotrn wrote:
Works a little like this.
BEGIN {
use POSIX qw(uname);
my ($uname_s, $uname_r) = (POSIX::uname())[0,2];
unshift(@INC, /var/opt/modules/$uname_s/$uname_r );
}
my premise here is that you did the install by OS to
each of these
-Original Message-
From: Jackson, Harry [mailto:[EMAIL PROTECTED]]
Sent: Wednesday, May 15, 2002 12:23 PM
To: [EMAIL PROTECTED]
Subject: Optimising for fun/speed not good code was Unique Lists
Hi
sub harryGrep {
return [ grep { not $\{$_}++ } @_ ];
}
On Wednesday, May 15, 2002, at 10:14 , Connie Chan wrote:
@filelist = your_search_script_result();
for (@filelist) { unlink ($_) }
now you're showing some step forward
my complements!
for those who are wondering why beginners are here,
it's to learn and pass along that which they have
In addition to the comments already given, I would recommend familiarizing
yourself with the following modules:
Win32::AdminMisc from PPM repository http://www.roth.net/perl/packages:
---
Created by Dave Roth to add
For anyone reading this if you are new to Perl you are at the right place.
Its tuff reading at first but gets easier with time. Trust me I'm Irish.
Isn't that 'Kiss me I'm Irish?'
;-)
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Denham Eva [[EMAIL PROTECTED]] quoth:
*
*I see a number of mails about Perl books. Most of them mention the O'Reilly
*Books.
*Does anyone use Perl in a Nutshell? Is it any good as a reference book?
O'Reilly cornered the Perl book market pretty early so they have most of
the current worthwhile
Jim C. [[EMAIL PROTECTED]] quoth:
*There was a lot of stuff removed from Learning Perl 3rd Ed that was in
*2nd. It has been kind of cool to see what was removed. I guess they
*thought that some of the items were a: not important or relevant b: more
*advanced or c: deprecated (tm). I haven't
Czar [[EMAIL PROTECTED]] quoth:
*
*Any recommendations for Beginner's Tutorials web pages ?
http://bookmarks.cpan.org/search.cgi?cat=Training%2FTutorials
e.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Felix Geerinckx wrote:
on Wed, 15 May 2002 03:12:15 GMT, [EMAIL PROTECTED] (Drieux) wrote:
so you need to check that it is numeric...
so you could do it with say
if ( $val =~ /^\d+/ and $val 0 and $val 11) {
Not good enough.
$val = 3.141592654;
is perfectly numeric
On Wednesday, May 15, 2002, at 10:11 , Connie Chan wrote:
LN0;T=1;C=2;B=1234567890
LN1;T=0;C=3;B=AABBBCCC
LN2;T=0;C=4;B=0987654321
ok, some fun with creating a file for sysread/syswrite/sysseek stuff
http://www.wetware.com/drieux/pbl/Sys/ReadWriteFile.txt
ciao
drieux
---
--
To
Barbara Manfredini wrote:
I have some little problems:
If I have a file,how can I say to cut a line where my pattern is matched?
And how can I cut just the word or what is matched?
How can I take just what is after the @ symbol(to know the dominion
contained in my file) to put it in an
I am trying to write a package that will execute a sql statement for me in
my cgi pages, the following is the code for the package, but when I run it
at the command prompt I get error messages about the first line where I set
the $dsn. I think the problem is with the use of DBI. The sql that I
on Wed, 15 May 2002 20:02:01 GMT, John W. Krahn wrote:
Felix Geerinckx wrote:
$val = 3.141592654;
is perfectly numeric but fails your /^\d+/.
No it doesn't
Of course it doesn't!
Thanks John for spotting this (missing $ at the end of the regex :-)
--
felix
--
To unsubscribe,
Francesco Guglielmo wrote:
Please help me!
I'm going crazy!
It's perfect but I need something more.I need also the qw001234 with the
passwd that's in another file in format:
qw001234 rfvcde
And I want it for all lines of all files.
I'm obviously a beginner in perl so I don't know
What is the error?
Rob
-Original Message-
From: Miretsky, Anya [mailto:[EMAIL PROTECTED]]
Sent: Wednesday, May 15, 2002 4:16 PM
To: '[EMAIL PROTECTED]'
Subject: Help with my first package??
I am trying to write a package that will execute a sql statement for me in
my cgi pages, the
On Wednesday, May 15, 2002, at 01:02 , John W. Krahn wrote:
Felix Geerinckx wrote:
on Wed, 15 May 2002 03:12:15 GMT, [EMAIL PROTECTED] (Drieux) wrote:
[..]
if ( $val =~ /^\d+/ and $val 0 and $val 11) {
Not good enough.
$val = 3.141592654;
is perfectly numeric but fails your
Drieux wrote:
On Wednesday, May 15, 2002, at 01:02 , John W. Krahn wrote:
Felix Geerinckx wrote:
on Wed, 15 May 2002 03:12:15 GMT, [EMAIL PROTECTED] (Drieux) wrote:
[..]
if ( $val =~ /^\d+/ and $val 0 and $val 11) {
Not good enough.
$val = 3.141592654;
is perfectly
On Wednesday, May 15, 2002, at 01:50 , John W. Krahn wrote:
$ perl -le'
$val = q/3.1415BOB/;
if ( $val =~ /^\d+/ and $val 0 and $val 11) {
print True }
else {
print False }
print 1 + $val;
'
True
4.1415
hum... how to say this
a) try with
if ( $val =~ /^\d+$/ and
1 - 100 of 116 matches
Mail list logo
