John Moon wrote:
E.Horn wrote:
I want that it is ONLY possible to give in words!(a-z,A-Z)
[jwm] Try this and see if it gets you started ...
[jwm] perl -e 'print "Enter Input:";$in=<>;chomp($in); if ($in =~
/(\d|\W|\s)/) {print "bad input\n"; } else {print "Input OK\n";}'
That would allow underscores, which the OP did not mention.
--
Gunnar Hjalmarsson
Email: http://www.gunnar.cc/cgi-bin/contact.pl
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
