Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw

Re: Syntax error in using do-until loop: How can I fix it?

by jwkrahn (Monsignor)
on Jul 16, 2012 at 18:18 UTC ( #982054=note: print w/ replies, xml ) Need Help??

Help for this page

Select Code to Download

  1. or download this
    $sentence=~ s/\s//igs;
  2. or download this
    my @four=$sentence=~ /[a-zA-Z]{4}/igs; # Line 9 
  3. or download this
       my $length=length($word);
  4. or download this
    unless (open(RESULT,">$output")){
  5. or download this
    } until ( my $word=~ /^.*$/); # Line 22  
  6. or download this
    use warnings;
    close RESULT;

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://982054]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (5)
As of 2016-07-31 10:01 GMT
Find Nodes?
    Voting Booth?
    What is your favorite alternate name for a (specific) keyboard key?

    Results (269 votes). Check out past polls.