Hello,
I have this regular expression:
$List =~ /^(?:(\d+)\*)?(\w+)\/(?:(\d+)\*)?(\w+)$/;
It checks for a string like this: number*word/number*word
But it only accept integer number...
Does anybody knows how to change it to accept decimal numbers like 0.1???
Thanks,
Wagner Garcia Campagner
Hi Joel,
Ok... it is working just as i want...
No problem if the number is 1.8.6.5.4.3
Thanks,
Wagner Garcia Campagner
-Mensagem original-
De: Joel Hughes [mailto:[EMAIL PROTECTED]]
Enviada em: terça-feira, 10 de dezembro de 2002 12:21
Para: 'perl cgi'
Assunto: RE: Regular
xample, if i have a valiable:
$file = 'c:\dir\asdf.asd',
Then i try to put in the doc this way:
print "$file";
But when i run it apears $file in the .html doc and i wanted to see
c:\dir\asdf.asd
Thanks in advance,
Wagner
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Hi Gunther;
I've tryed to save the picture in the file but it didn't work.
The script is going as an attachment for you to take a look. My
modifications are in the end of the file.
Thank for your help in advance,
Wagner
-Original Message-
From: Gunther Birznieks [mai
i put the $ symbol? The script interpert it as a variable and i just
want the caracter...
Thanks in advance,
Wagner.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
blem is that $host1 aways get the first valur (ACCESSO 1) even if its
value is access_2...
I may be doing some mistake in the if line
Thanks,
Wagner
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
t...
Thanks in advance
Wagner.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
f"
|| $password2 ne "pass2")) {
print "dfdfsafsa";
}
it is not working is these boolean operators right???
Thanks in advance,
Wagner
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
o use md5 or sha-1 to solve it.
Thank again,
Wagner.
-Original Message-
From: Brent Michalski [mailto:[EMAIL PROTECTED]]
Sent: Thursday, October 11, 2001 1:22 PM
To: Wagner Garcia Campagner
Cc: [EMAIL PROTECTED]
Subject: Re: security in perl
Please forgive the formatting of this message, I a
N'T WANT THE USER TO CLICK
#ON THE SUBMIT BUTTON WHEN IT HAPPENS, I WANT IT TO AUTO SUBMIT...
print "Content-type:text/html\n\n";
print <
EndOfHTML
}
Thanks again,
Wagner
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
in advance,
Wagner Garcia Campagner
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Hi Christo,
you can use MD5 or Sha-1
read the documentation on the topic: Digest
Thanks,
Wagner.
-Original Message-
From: Christo Rademeyer [mailto:[EMAIL PROTECTED]]
Sent: quinta-feira, 6 de dezembro de 2001 13:04
To: [EMAIL PROTECTED]
Subject: encrypt Pass
Hi how must I go to
Hi,
I'm trying to compile a script that is using gd.pm.
But it seems that this library is not installed in my activestate version
(5.6.1.629).
Is there a way for me to use this script with this version of activestate or
use another library?
Thanks in advance,
Wagner
--
To unsubs
ct to the selected script but sending some variables too i can't
do that i'm thinking about it for days and can't find a solution.
Thanks in advance,
Wagner Garcia Campagner
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
???
Thanks in advance,
Wagner
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Hi,
I have a variable $var = 34.5678
If I
printf ("%.2f", $var);
Then $var = 34.56
Is there a way for me to format $var to became 34,56 instead of 34.56 ???
Thanks,
Wagner.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Hi,
I have a variable $var = 34.5678
If I
printf ("%.2f", $var);
Then $var = 34.56
Is there a way for me to format $var to became 34,56 instead of 34.56 ???
Thanks,
Wagner.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Hi,
I don't know how to tell perl EOF, i am doing a search in a file like this:
$username eq 'wagner';
$file = 'c:\file';
open(INFO, $file);
do
{
$lines = ;
chop $lines;
}
while ($lines !~/$username/);
close(INFO);
The problem is if the file doesn't have a
Hi,
how can i remove a specific line from a txt file
the file is list of users this way:
user1
user2
user3
..
..
..
userN
In my script i have the following:
$remove eq 'user3'; (for example)
so how can i tell perl to remove the third line of this file
Thanks in advan
Hi,
I'm trying to test a variable for special caracters... but i'm not having
success...
I'm doing:
if ($var =~ \w) {
..
}
But it doesn't work.
Thanks in advance,
Wagner Garcia Campagner
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
but i got no success...
Thanks in advance,
Wagner Garcia Campagner
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
o success...
Thanks in advance,
Wagner Garcia Campagner
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Hi,
Sorry for the stupid question, but i didn't find in the FAQ.
What is the sintax to delete a file???
Thanks in advance,
Wagner Garcia Campagner
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
is when i do "view source" on the page1.pl I can see the
username and the password in plain text
Is there a way for me to pass this information to
page2.pl without everyone see it when "view source" is used???
Thanks in advance and forgive me for this long
text,
Wagner.
24 matches
Mail list logo