Beefy Boxes and Bandwidth Generously Provided by pair Networks
"be consistent"
 
PerlMonks  

Re: Filtering CGI Input

by crashtest (Curate)
on Apr 24, 2005 at 06:15 UTC ( [id://450882]=note: print w/replies, xml ) Need Help??


in reply to Filtering CGI Input

My input should be any number from 0 to 99999.
Well, then why use regular expressions at all? Isn't this just a simple number comparison? How about: 
if ($sid < 0 or $sid > 99_999){
   ...
}

[download]

Replies are listed 'Best First'.
Re^2: Filtering CGI Input
by davidj (Priest) on Apr 24, 2005 at 07:10 UTC
    No, it is not that simple as the following code demonstrates:
    #!/usr/bin/perl

use strict;

my $num = "123abc";
print "valid\n" if $num > 0 && $num < 99999;
exit;

    [download]
    This will print 'valid', even though it does not meet the OP's criteria.

    Thus, if the value "123abc" is passed from a web form to a cgi script, the code you suggest will validate it. The reason for this is because when using numeric comparisons, Perl will treat any string that begins with a number as a number. This is clearly not what the OP wants.

    davidj
[reply]
[d/l]

In Section Seekers of Perl Wisdom

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?

www.com | www.net | www.org
Node Status?
node history
Node Type: note [id://450882]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? • Last hour • Other CB clients
Other Users?
Others imbibing at the Monastery: (4)
As of 2024-04-19 12:06 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found