[Please don't top-post] [154 lines removed from end of message]
Allison Ogle wrote:
>
> My code so far...
>
> $word = <DATA>;
> chomp $word;
> if ($word=~ /^\s+$/){
> print "There is no word."; }
chomp( my $word = <DATA> );
print "There is no word." unless $word =~ /\S/;
John
--
use Perl;
program
fulfillment
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
