Re: check STDIN

2004-10-27 Thread Gunnar Hjalmarsson
John Moon wrote: Gunnar Hjalmarsson wrote: 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

RE: check STDIN

2004-10-27 Thread Moon, John
-Original Message- From: Gunnar Hjalmarsson [mailto:[EMAIL PROTECTED] Sent: Wednesday, October 27, 2004 9:06 AM To: [EMAIL PROTECTED] Subject: Re: check STDIN John Moon wrote: > E.Horn wrote: >> I want that it is ONLY possible to give in words!(a-z,A-Z) > > [jwm] Try

Re: check STDIN

2004-10-27 Thread Gunnar Hjalmarsson
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 underscore

RE: check STDIN

2004-10-27 Thread Moon, John
-Original Message- From: E.Horn [mailto:[EMAIL PROTECTED] Sent: Wednesday, October 27, 2004 7:53 AM To: [EMAIL PROTECTED] Subject: check STDIN Hello!! My question is,how to check the STDIN! I want that it is ONLY possible to give in words!(a-z,A-Z) #!/usr/bin/perl -w use LWP::Simple

Re: check STDIN

2004-10-27 Thread Gunnar Hjalmarsson
E.Horn wrote: My question is,how to check the STDIN! I want that it is ONLY possible to give in words!(a-z,A-Z) #!/usr/bin/perl -w use LWP::Simple; use strict; sub daten_einlesen { print "geben Sie ein gtpprotein ein\n"; my $eingabe =; First you probably want to remove the newline symbol: