Beefy Boxes and Bandwidth Generously Provided by pair Networks
Your skill will accomplish
what the force of many cannot
 
PerlMonks  

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

by pvaldes (Chaplain)
on Jul 16, 2012 at 23:25 UTC ( #982103=note: print w/replies, xml ) Need Help??


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

Wishful thinking must die...

my $sentence="to baah or not to chomp, that's the question"; my $garbage = 0; $garbage++ while ($sentence =~ /[,'\s]/g); @chars = split //, $sentence; print "You can create ", (scalar(@chars) - $garbage)/4.0," groups of f +our characters here\n";

A little twisted but it works... note that you don't lose any info here in your sentence

Updated: printing the groups

@chars = grep {!/(,|'|\s)/} @chars; my $n = 0; while ($n < $#chars){ print $chars[$n],$chars[$n+1],$chars[$n+2],$chars[$n+3],"\n"; $n = $n+4}

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://982103]
help
Chatterbox?
[Discipulus]: Ah! if so you must play with him not with us ;=)
[vrk]: Hope he gets better soon.
[Discipulus]: hdb sorry i profit; is known that a prime number is never a figurate one nor the sumattion of two adjacent figurates of the same order? like 3th triangular+3th tetrahedric
[Discipulus]: if known where i can read about the matter?
[choroba]: he's not really sick, we just got nobody to look after him today
[Discipulus]: create an account for him; we are funny baby sitters ;=) come here child, want to listen the typeglob tale?
[vrk]: choroba Oh, that's good.
[vrk]: Discipulus I don't know much about prime numbers, but wouldn't that kind of an answer be in a graduate-level number theory book?
[Discipulus]: my 8 yo daughter has two weeks of sleep disturbs.. we are gonna be crazy..

How do I use this? | Other CB clients
Other Users?
Others scrutinizing the Monastery: (9)
As of 2017-04-27 07:57 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    I'm a fool:











    Results (501 votes). Check out past polls.