> -----Original Message-----
> From: Bruce Ambraal [mailto:[EMAIL PROTECTED]]
> Sent: Thursday, February 14, 2002 1:24 AM
> To: [EMAIL PROTECTED]; [EMAIL PROTECTED]
> Subject: Help can't figure this one out
> 
> 
> I have written following coding to produce a triangle 
> pattern(see below);
> I now want to  produce following paterns I can't figer this out
>
> ...
>
>     # indent by printing num_rows - r spaces
>     for ($i = 1; $i <= $num_rows - $r; $i++) {print ("  \n");}

A suggestion: if you want to write Perl programs, you should 
resist the temptation to write them like C programs. This kind 
of thing can be simplified to something like:

   print "  \n" for 1 .. ($num_rows - $r);

or better yet:

   print "  \n" x ($num_rows - $r);

If you haven't done so already, grab a copy of Schwartz'
Learning Perl and work through it. That will show you some
of the idioms that can greatly simplify your programs.

(BTW, are you aware that this statement does not do what the 
comment says it does. You should fix one or the other.)

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to