in reply to Quickie regular expression question.

You want 
if ( $newpasswd !~ /^[A-Za-z0-9]+$/ ) {
  # blah
}

[download]
(if you want the "blah" to execute when the variable contains anything EXCEPT ALL letters and/or numbers)
--------------
It's sad that a family can be torn apart by such a such a simple thing as a pack of wild dogs

In Section Seekers of Perl Wisdom