" or die "Cannot open file: $!\n";
> > >
> > > while() {
> > >do something with the line;
> > > }
> > >
> > > close(FILE);
> > >
> > >
> > > What I want to do is read just the last line. Might help in
to any one or make copies.
>
> ** eSafe scanned this email for viruses, vandals and malicious content **
>
>******
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
--
Etienne Marcotte
Specifications Management -
;." and
".." and all non-vista90n* files when doing your readdir, but for that a
perl guru will have to answer.
Etienne
Etienne Marcotte wrote:
>
> opendir (DIR, "/home/skhan01/perl/file_tests") || die "Can't open
> directory: $!";
> m
message, please notify the
> sender immediately and delete the material from any computer. Do not
> deliver, distribute or copy this message, and do not disclose its
> contents or take any action in reliance on the information it
> contains. Thank you.
>
>
information that I
> perform from my home PC, and would like to just run a programme that
> would go away, pick up the information from a web page a deposit it onto
> my PC.
>
> Any help much appreciated.
>
> Thanks
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
ubscribe, e-mail: [EMAIL PROTECTED]
> > For additional commands, e-mail: [EMAIL PROTECTED]
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
--
Etienne Marcotte
Specifications Management - Quality Control
Imperial Tobacco
can I create a user to log in with other than the root (with mysql
access)
Where do I put my script files?
I'd like some online tutorials please
I'm kinda lost
Etienne
--
Etienne Marcotte
Specifications Management - Quality Control
Imperial Tobacco Ltd. - Montreal (Qc) Canada
51
sible to add the extra or condition?
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
--
Etienne Marcotte
Specifications Management - Quality Control
Imperial Tobacco Ltd. - Montreal (Qc) Canada
514.932.6161 x.4001
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
homp; #a)
> my $line=$_;
> print STDERR "\nline: $line";
> }
> }
> else
> {
> #send email
> }
>
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
>
> --
> To unsubscribe, e-mai
if you still have questions.
I think you mean [EMAIL PROTECTED]
^^
Etienne
>
> - ~C.
> --
> $a="printf.net"; Chris Ball | chris@void.$a | www.$a | finger: chris@$a
> As to luck, there's the old miners' proverb: Gold is where you find it.
>
> --
>
= $dbh->prepare(SELECT usrPass,usrInfo FROM users where usrName
LIKE ?);
$sth->execute($loginname);
while (my @userdata = $sth->fetchrow_array())
{ $userdata[0] = substr($userdata[1],3); }
#do whatever you want with the data...
Etienne
Etienne Marcotte wrote:
>
> check out substr!
>
}
> }
>
> Aaron Shurts
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
--
Etienne Marcotte
Specifications Management - Quality Control
Imperial Tobacco Ltd. - Montreal (Qc) Canada
514.932.6161 x.4001
--
To
's returned, I'd really appreciate it.
>
> Thanks,
>
> Rohesia Hamilton Metcalfe
>
> __
> Do You Yahoo!?
> Check out Yahoo! Shopping and Yahoo! Auctions for all of
> your unique holiday gifts! Buy at http://shopp
nly*. Thanks for your
> cooperation.
>
> Cheers,
> Kevin
>
> --
> [Writing CGI Applications with Perl - http://perlcgi-book.com]
> I keep looking for the "Crash after viewing X pages" settings in Netscape, but
> I just can't find it.
> -- me
>
ugh. Although I may not currently possess the information that
> he is looking for I can still spot a thoroughly precise question.
> Apparently you can not. Maybe you should work on that before you get your
> masters in elitism. Thanks.
>
> --
> To unsubscribe, e-mail: [EMA
iginal question about the 5
pages form:-)
Etienne
[EMAIL PROTECTED] wrote:
>
> > -----Original Message-
> > From: Etienne Marcotte [mailto:[EMAIL PROTECTED]]
> > Sent: Wednesday, December 12, 2001 10:53 AM
> > To: [EMAIL PROTECTED]
> > Cc: [EMAIL PROTECTED]
e (sorry, I don't know!) would
> have to do a lot more work to read and decode them from STDIN (if using
> post) or $ENV{QUERY_STRING} (if using get).
>
>I completely agree with your recommendation for auto writing the hidden
> field values. (Untested and unchecked by
hion...but again welcome to
> idiotville.)
>
> Thanks.
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
--
Etienne Marcotte
Specifications Management - Quality Control
Imperial Tobacco Ltd. - Montreal (Qc) Canada
514.932.61
ndividual or entity
> named in the message. If you are not the intended recipient of this message,
> please notify the sender thereof and destroy / delete the message. Neither
> the sender nor Sappi Limited (including its subsidiaries and associated
> companies) shall incur any liability
t I don't understand what the ?: is for;
> my Perl book says it doesn't do backreferences; what does that mean?
> Oh, fun with regexes. :)
> Pete
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
--
Etienne M
t; "one two three" with "one_two_three", thinking that then I could split on spaces
> and then strip out the _, but I didn't have any luck with that, either. Any pointers
> would be greatly appreciated.
>
> Pete
>
> --
> To unsubscribe, e-mail: [E
~->
>
> Unsubscribing info is here: http://help.yahoo.com/help/us/groups/groups-32.html
>
> Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/
--
Etienne Marcotte
Specifications Management - Quality Control
Imp
nior Programmer
> Onsite! Technology (http://www.onsitetech.com/)
> "Ovid" on http://www.perlmonks.org/
>
> __
> Do You Yahoo!?
> Send your FREE holiday greetings online!
> http://greetings.yahoo.com
>
> --
&g
___
> Do You Yahoo!?
> Send your FREE holiday greetings online!
> http://greetings.yahoo.com
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
--
Etienne Marcotte
Specifications Management - Qualit
ome of the code:
>
> print $query->start_form();
>
> print "";
> print "Tool Name";
> print $query->textfield('name'), "\n";
> print "";
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For addition
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
--
Etienne Marcotte
Specifications Management - Quality Control
Imperial Tobacco Ltd. - Montreal (Qc) Canada
514.932.6161 x.4001
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
_
> Do You Yahoo!?
> Get your free @yahoo.com address at http://mail.yahoo.com
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
--
Etienne Marcotte
Specifications Management - Quality Control
Imperial Tobacco Ltd. - Montreal (Qc) Canada
514.932.6161 x.4001
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
t; if $searchstring has at least 1 letter or number { commands... }
>
> Status []s
--
Etienne Marcotte
Specifications Management - Quality Control
Imperial Tobacco Ltd. - Montreal (Qc) Canada
514.932.6161 x.4001
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
e
> wonder how my code is working. Also, I don't include: use
> Time::localtime;
> Is it a function of my server or the CGI module that makes my code work?
> Will this fail if I move the script to a different server?
>
> Just Wondering.
>
> Matt Richter
>
>
uthor. The message is intended for the addressee only and its
> > contents and any attached files are strictly confidential. If you have
> > received it in error, please telephone the number above. Thank you.
> >
> >
> > **
**********
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
--
Etienne Marcotte
Specifications Management - Quality Control
Imperial Tobacco Ltd. - Montreal (Qc) Canada
514.932.6161 x.4001
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
elp will be appreciated.
>
> Thanks
> Andy
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
--
Etienne Marcotte
Specifications Management - Quality Control
Imperial Tobacco Ltd. - Montreal (Qc) Canada
514.932.6161 x.4001
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
is private, privileged or
> confidential and is intended solely for the use of the individual or entity
> named in the message. If you are not the intended recipient of this message,
> please notify the sender thereof and destroy / delete the message. Neither
> the sender nor Sappi Limited (incl
r opinions expressed are those of
> the author. The message is intended for the addressee only and its
> contents and any attached files are strictly confidential. If you have
> received it in error, please telephone the number above. Thank you.
>
> ***
e must be a
> > way to specify a URL which can cause Perl to generate HTML on
> > the fly for IE to render. I simply want to do this locally
> > so is there a way to do this? I feel sure this should be possible.
> >
--
Etienne Marcotte
Specifications Management - Qualit
]
>
> I have not lost my mind, it's backed up on tape somewhere!
>
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED
idate');
> > my $position = $q->param('position');
> > my $education = $q->param('education');
> >
> > # send the values from my URL command line to the dataform.html to be
> > added and appended:
> >
> > open(OUT, "&g
es that are at least 3 days old.
> > Good luck all,
> > You're welcome to pick who you think is the winner.
> > Roiy
> >
> >
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
>
> --
> To u
n Perl and another good book on
> MySQL / databases. There is no one good MySQL+Perl book out there that
> will answer all of your questions or show you all of the concepts you
> need to master.
>
> Z.
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
--
Etienne Marcotte
Specifications Management - Quality Control
Imperial Tobacco Ltd. - Montreal (Qc) Canada
514.932.6161 x.4001
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
re TWO OR MORE persons. If it said
> >"the oldest has blue eyes", then there could only be one person with the
> >highest age; but since it says "the oldest have blue eyes", that means
> >that more than one person has the highest age. The combination is
> &
windows in
my house.
Mr.Foo: I know how many windows there are in your house, but that
doesn't tell me the age of your children.
Mr.Bar: The oldest have blue eyes.
Mr.Bar: A, now I know
Determine the ages of the 3 children of Mr.Bar
(Good luck:)
--
Etienne Marcotte
Specifications
I did not receive a single email from the list since this morning.
And did not receive my own email sent to the list
Are you reading this?
Etienne
--
Etienne Marcotte
Specifications Management - Quality Control
Imperial Tobacco Ltd. - Montreal (Qc) Canada
514.932.6161 x.4001
--
To
; MIS Security Administration
> Imperial Tobacco Canada Ltd
>
> ***
> ***
> ***
>
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
--
Etienne Marcotte
Specifications Management - Quality Control
Imperia
the file already
> exists.
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
--
Etienne Marcotte
Specifications Management - Quality Control
Imperial Tobacco Ltd. - Montreal (Qc) Canada
514.932.6161 x.4001
--
To unsubscribe, e-mail: [EMA
t;
> Clive Lansink
> Email: [EMAIL PROTECTED]
> Phone: +64 9 520-4242
> Fax: +64 21 789-150
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
--
Etienne Marcotte
Specifications Management - Quality Control
Imperial
o look at it again?
>
> --
> Best regards,
> Danielmailto:[EMAIL PROTECTED]
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
--
Etienne Marcotte
Specifications Management - Quality Control
Impe
gt; > database or not?
> >
> > print "\t\t$ulist[$i]{'Title'}\n";
>
> Actually, "use strict" isn't the culprit; it's -w or "use warnings".
>
> For 5.6 and higher, you can wrap the code in a block like this:
>
> {
pl line 1288
>
> every time a record comes up with no title field populated.
>
> Is there some way to make this work whether a value was read from the
> database or not?
>
> print "\t\t$ulist[$i]{'Title'}\n";
>
> --Chuck
>
> --
> To un
gt; To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
--
Etienne Marcotte
Specifications Management - Quality Control
Imperial Tobacco Ltd. - Montreal (Qc) Canada
514.932.6161 x.4001
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
ople use
>
> if($html =~ /(<[^>]*>)/) {
>
> }
>
> instead of simple to use and understand
> if($html =~ /(<.*?>)/) {
>
> }
> To extract HTML tags.
>
> Regards,
> Girish
>
> --
> To unsubscribe, e-mail: [EMAIL
g FedEx if necessary and you're in a hurry, it'll pay off.
> --
> Peter Scott
> Pacific Systems Design Technologies
> http://www.perldebugged.com
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
--
Etie
a Studios
> Boyd White
> Database Engineer
> [EMAIL PROTECTED]
> (903)731-9644
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
--
Etienne Marcotte
Specifications Management - Quality Control
Imperial Tobacco Ltd. - Mo
but if you have
> lots of users then a cron job to delete records where the user
> hasn't accessed for more than 10 minutes running once a day or
> something would be good.
>
> hope that gives you some idea of a way to start...
>
> --
> Best regards,
> Daniel
--
Etienne Marcotte
Specifications Management - Quality Control
Imperial Tobacco Ltd. - Montreal (Qc) Canada
514.932.6161 x.4001
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
o update every x minutes the number/handles of the users?
I am really confused on how to do this..
Etienne
--
Etienne Marcotte
Specifications Management - Quality Control
Imperial Tobacco Ltd. - Montreal (Qc) Canada
514.932.6161 x.4001
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For
7;m not sure we can use the !-e (-e test existence of a file)
Etienne
"Michael D. Risser" wrote:
>
> On Friday 16 November 2001 01:36 pm, Etienne Marcotte rambled:
> > > for(my $i = 2, my $j = 1; $i <= $last;$i++, $j++) {
> > > if ($j ne $
::UsrPass?
>
> -Original Message-
> From: Etienne Marcotte
> To: Gibbs Tanton - tgibbs
> Cc: '[EMAIL PROTECTED] '
> Sent: 11/16/2001 12:10 PM
> Subject: Re: Need help with an error
>
> sub auth_user{
> my ($dbh,$user,$pass) = @_;
> my $sth = $dbh-
efore deciding what
> sort to use. Maybe at this point you might want to just use mergesort
> or quicksort and be done with it. I'm going to go mess with Benchmark.pm
> and see what happens.
>
> Okay, maybe it's wandering a little far from Perl Beginners, but it sure is
>
k5twM8PcwM9O9yVxhOZeInXR
> NUBzqjpK8FfRZgt1TaOz/CpdacNAJ9i2cShvH6wcCbHxGL9rjAu+IwADBgQA0t8p
> 1ivBcABEmK4o+r5+uXZoQ4jUzDDN5bZmddQOQhyyMX/JUeBX7gxQ7r2cYJHIlcN+
> FCeqUHLmgQ/Ky+gze61Yr+FeEBJ4EPklkHWu3RoS4aKlEtU688nm+8Mfph6nYl+n
> HzmaZjf5hz/mqvs5bzBCrw+xSSjNhJBrmj8qzIqIRgQYEQIABgUCO4KvEgAKCRD+
> KQ71AxKDd2/JAJ9vnTOSbmB2Xc
N::UsrPass ever get anything assigned to
> it? I see where you pass it in, but where does it get assigned?
>
> -Original Message-
> From: Etienne Marcotte
> To: [EMAIL PROTECTED]
> Sent: 11/16/2001 11:56 AM
> Subject: Need help with an error
>
> [Fri Nov 16 12:3
eed that value anymore after...
{e}
--
Etienne Marcotte
Specifications Management - Quality Control
Imperial Tobacco Ltd. - Montreal (Qc) Canada
514.932.6161 x.4001
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
not a form with hidden fields but only a link to
the script name)
Do you think the script should re-confirm password against the DB
everytime the script is called or once per session is fine (either
writing cookie or sending infos via POST)
e.
--
Etienne Marcotte
Specifications Management
ossibility of getting the username (in the WWW) with(/out) login
> ?
> Is there an environmentvariable which chatches this ?
>
> Thanks,
> Nicolas
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
--
Etienne Marcotte
01);
> my $first = timelocal(0,0,0, 1, $mon % 12, ($year-1900 + int($mon/12)));
>
> my $last = $first - 86_400;
>
> my $dow = (localtime $last)[6];
> my $day = (qw( Sun Mon Tues Wednes Thurs Fri Satur ))[$dow] . "day";
>
> --
> To unsubscribe, e-mai
> --
> > Jeff "japhy" Pinyan [EMAIL PROTECTED] http://www.pobox.com/~japhy/
> > RPI Acacia brother #734 http://www.perlmonks.org/ http://www.cpan.org/
> > ** Look for "Regular Expressions in Perl" published by Manning, in 2002 **
> >
> >
arts of existant modules to keep only what we
will really use?
Etienne
Bob Showalter wrote:
>
> > -Original Message-
> > From: Etienne Marcotte [mailto:[EMAIL PROTECTED]]
> > Sent: Wednesday, November 14, 2001 11:34 AM
> > To: [EMAIL PROTECTED]
> > Subject: re
Is there somewhere on internet we can read a module's code, without
installing on the computer.
My laptop isn't on internet and I'd like to read some code from
Image::size
Etienne
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Ok, after 5 days running,
101 different persons replyed within 5 days.
Pretty good:-)
Etienne
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
And if you want a good start, there are loads of sample scripts on the
web 9free)
They have number of files settings, types of files, can create in
separate folders, rename, etc etc..
http://www.cgi-resources.com/ or others
Etienne
[EMAIL PROTECTED] wrote:
>
> Check out CGI.pm, and one more t
Etienne
Curtis Poe wrote:
>
> --- Etienne Marcotte <[EMAIL PROTECTED]> wrote:
> > This is a very newbie question..
> >
> > When sending arguments to a sub, is it preferable to send a pointer to
> > this value or the value itself. Or after x arguments it's better
x27;t know.
Anyways I'll fool around a little
Etienne
Bob Showalter wrote:
>
> > -----Original Message-
> > From: Etienne Marcotte [mailto:[EMAIL PROTECTED]]
> > Sent: Tuesday, November 13, 2001 2:44 PM
> > To: [EMAIL PROTECTED]
> > Subject: YARQ (Yet A
I saw somewhere on the web a good regexp for removing html tags. Can't
re-find it and it needed some minor mods.
Let's say the $line is 'this is a large wordin
size 2';
I played a little around, but it always removed between the first < and
the last > (and I knwo the tutorial on the web said how
This is a very newbie question..
When sending arguments to a sub, is it preferable to send a pointer to
this value or the value itself. Or after x arguments it's better to send
references?
Etienne
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
There is a HUGE pdf on imagemagick at
http://www.e.kth.se/unix-systemet/admin/ImageMagick/ImageMagick.pdf
but it's not for the very last version, at least it will get you working
and do probably everything.
There is a section in that pdf about perlmagick.
I never used it but once my website wil
perlmagick can do that too
www.imagemagick.org/www/perl.html
Etienne
[EMAIL PROTECTED] wrote:
>
> Hello, I know php can do this
>
> can perl take an image, and write text over it dynamically?
>
> I use linux and perl 5.+ on raq 3
>
> Would this require a gd library?
>
> Is this possible?
>
I knew Jeff would be the first one answering this one, too bad I could
not bet on this.
You're the regex master:-)
Etienne
Jeff 'japhy' Pinyan wrote:
>
> On Nov 9, Robert Thompson said:
>
> >I am looking at the "Insert comma's into a number" script in
> >Oreily's Perl Cookbook (pg 64) and ha
($equip =~ /ONI/) ? SnmpModONI() : SnmpModEXTREME();
This should work, did not test...
Etienne
Mark Johnson wrote:
>
>if( $equip =~ /ONI/ )
>{
> SnmpModONI();
>}
>else
>{
> SnmpModEXTREME();
>}
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additi
By reading the messages everyday I can guess most of us are from United
States right? And since there are not a lot of messages in (my) morning
time, probably means most are from the west coast (different timezone).
Am I right?
I'm from Quebec, Canada.. and you?
Sorry if it's way off topic, I h
In my previous post I used -f for missing file, but -f is for a file
present so it would either go into a else, or check which one is the
missing file flag, I think it's -e :-/
Etienne
Bob Showalter wrote:
>
> > -Original Message-
> > From: Michael D. Risser [mailto:[EMAIL PROTECTED]]
>
.$#fileNames-2) {
if (-f) {
print "Sending missing for file: $_";
&sendMissing;
}
}
Etienne
Etienne Marcotte wrote:
>
> #|--Remove Before Flight-->
>print "Number of files to process:" $#fileNames+1 "\n"; # maybe with
&g
#|--Remove Before Flight-->
print "Number of files to process:" $#fileNames+1 "\n"; # maybe with
dots between the parts
print "Press any key to continue, Ctrl-C to exit\n";
chomp(my $in=);
#<--Remove Before Flight--|
# Go through each file we found
for(0..$#fileNames) {
if (-e $
oops
my bad
it's the third time he posts his code and it's different each time :P
The one before was for(0..$#array)
that's why I told it was the index
Etienne
"Brett W. McCoy" wrote:
>
> On Thu, 8 Nov 2001, Etienne Marcotte wrote:
>
> > because $_ co
because $_ contains the index number only
you need to access the element of the array!!!
-label=>$_boards[$_],
-value =>$_boards[$_],
Etienne
Jorge Goncalvez wrote:
>
> Hello, i have this:
>
> open (IPCONF,"< $_Globals{IPCONFIG}") or die "je ne peux ouvrir
> $_Globals{IPCONFIG} :$!";
>
my $yr = (localtime)[5]; # don't need to get all values
prinf("%02d",$yr%100); #or you can put the value in a variable using
sprintf.
voilĂ
Etienne
Glenn Cannon wrote:
>
> I am trying to force the current year to be show as a two digit
> number, with
> leading zero if necessary.
> Here is wha
He want's to take then in his global variables list.. where $DOMAIN is
plexus.com and ADMIN is Chuck
Etienne
dan radom wrote:
>
> just a thought, but how can you print a variable that hasn't been defined yet?
>
> dan
>
> * Tomasi, Chuck ([EMAIL PROTECTED]) wrote:
> > System: Sun Ultra 2, Sola
> --
> #!/usr/local/bin/perl -w
>
> use strict;
> use DBI;
>
> require "defs.pl";
>
> print "Welcome to $DOMAIN, $ADMIN\n";
>
--
#!/usr/local/bin/perl -w
use strict;
use DBI;
use defs;
print "Welcome to defs::$DOMAIN, defs::$ADMIN\n";
--
check out http://www.crusoe.net/~jeffp/articles/pm/2000-05.html
a really good document on closures...
Etienne
Jenda Krynicky wrote:
> Original suggestion (comments stripped):
> > {
> > my $savedData = 0;
> >
> > sub rememberData
> > {
> > $savedData = shift if @_;# upda
I know there are some scripts (modules) that uses phonetic matching..
Really great when you try to find a name that can be spelled 7 different
ways.
I would need to find where I read this, I think it was in Advanced SQL
book
Etienne
Matt Klicka wrote:
> I'm looking for some ideas on how to do
Damn I'm stupid
You wrote name=Category
and you're trying to find $in{'category'}
note the capital C
That's where your error is..
You may use your cgi-lib it's fine:-)
Etienne
[EMAIL PROTECTED] wrote:
Etienne Marcotte <[EMAIL PROTECTED]> wrote in message
I really don't know..
the @me.com looks like invalid
550 <[EMAIL PROTECTED]>... Host unknown (Name server: me.com: no data known)
I am trying your script on my laptop right now
Etienne
Mike wrote:
> How is that?
> Etienne Marcotte <[EMAIL PROTECTED]> wrote in mes
From:
Mail Delivery Subsystem <[EMAIL PROTECTED]>
Subject:
Returned mail: Host unknown (Name server: me.com: no data known)
To:
<[EMAIL PROTECTED]>
The original message was received at Thu, 1 Nov 2001 13:06:15 -0500
(EST)
from uucp@localhost
- The following
t
Etienne
[EMAIL PROTECTED] wrote:
> Something must not be reading right. I still get the same result from the
> category. A blank. Everything else is there though.
>
> Mike
>
> Etienne Marcotte <[EMAIL PROTECTED]> wrote in message
> [EMAIL PROTECTED]">news:[EMAIL
http://www.cgi-resources.com/
That's where I started to learn/ understand / like perl
Now I am scripting my own, but it's a really good start and you have tons of
scripts that will often do more than what you need:-)
Etienne
pc wrote:
> I'm learning Perl so I can program CGI Web applications
I you just say
use strict;
my $full_address = '"My Name" <[EMAIL PROTECTED]>'
my ($user, $email) = split (///g; # remove the last > in the adress
print "hello $user, is $email you adress?\n";
Etienne
"Watkiss, Stewart" wrote:
> Hello,
>
> This is a resend of my earlier email. Apologies to an
t;$logfile") || die "I can't open $logfile\n";
> print FILE "Someone requested a link addition\n";
> print FILE "Category $in{'category'}\n";
> print FILE "E-mail $in{'email'}\n";
> print FILE "URL $in{'url
The CGI (or other parsing sub) reads the data selected from the drop
down, which is in the "value" part of each tag.
option 1
option 2
option 3
then in your param{'dropdown'}you should have 1, 2 or 3 depending on the
option that he choose.
What are you using to parse the data? CGI.pm ? That
ut for a long part it's way too
long to escape caracters and format so that the source looks not too bad.
Any clue?
Etienne
RaFaL Pocztarski wrote:
> Etienne Marcotte wrote:
> >
> > print< > or print<<"END";
> >
> > it gives me a warning &qu
When I put warnings on and have a block of printed text with
print<
using $allowed = ($username eq 'admin');
how do I check for allowed? with 1 :0 I can do if ($allowed), do I need to do
if ($allowed eq "true")? If yes it's a little longer to write:-)
Etienne
Jeff 'japhy' Pinyan wrote:
> On Oct 30, Me said:
>
> >> > $allowed = $username eq 'admin' ? 1 : 0;
> >>
assigned a value of 0.
>
> Rex
>
> -Original Message-
> From: Etienne Marcotte [mailto:[EMAIL PROTECTED]]
> Sent: Tuesday, October 30, 2001 9:56 AM
> To: [EMAIL PROTECTED]
> Subject: $a = $b eq "" ? 1 : 0;
>
> $allowed = $username eq 'admin' ?
$allowed = $username eq 'admin' ? 1 : 0;
Can someone explain me this line? I don't get the ? 1 : 0 part
They say it need to be used instead of $allowed = 1 if $username eq
'admin'; for a mod_perl env.
Etienne
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAI
1 - 100 of 129 matches
Mail list logo