One of my cohorts pointed me in the right direction. I should have known
this from previous experience.
if ($st !~ /^[a-zA-Z \']+$/) {
print "$st: bad chars found\n";
} else {
print "$st: OK\n";
}
A simple "^" at the beginning and "$" at the end.
Thanks to all who assisted with
Hmmm I'm not getting where I want to go. Consider the following code:
#!/usr/bin/perl -w
@a = ( "chuck",# Good
"chuck99", # bad - numbers in a name?
"chuck_5", # bad - numbers/underscore in a name
"chuck!3", # bad - symbols?
"chuck t",
That's essentially correct. If you remove a symlink, you remove a
shortcut and the original file still exists.
If you remove what a symlink points to and the symlink is left intact, it
is an invalid link. The data is gone and if you reference the symlink
you'll get an error.
Regular (hard) link
> Why not go with /[\w ]+/
> \s contains more than just a ' ' and I don't know if an apostrophe in a name
> is really valid or not.
> Rather, I think the earlier suggestion of /[\w ]{,20}/ might be better so you
> can limit the string length to only the first 20 characters.
> Similarly, I would l
System Specs
Perl 5.6.1 (dev) 5.8.0 (prod)
Mac OS X 10.2.2 (dev) NetBSD 1.5.2 (prod)
MySQL 3.23.52
I'm writing a web form to accept user applications. Like most programs,
I'd like to keep the garbage characters out to limit hacking attempts.
I want to verify the firstname and last na
Perl 5.6.0
OS: NetBSD 1.5.2 (and Solaris 7)
I've got a program that regularly sends mail to people, however once in a
while I get a report from someone stating that they missed a piece of
mail. It's not all the time or I would have a major problem on my hands.
I'm using the following construct:
I suspect there is something out there to do what I need, but I'm not
quite sure what to look for. I was hoping this would be a more efficient
way of asking...
Setup: Apache 1.3.x, Perl 5.6.0, Sun Solaris 2.7.
I need to write a CGI program that makes an HTTP connection (port 80) and
does a GET
