At 9:04 AM -0500 2/10/01, Kevin Reid wrote:
>for$y(0..31){for(0..31){print$_&$y?$":'*'}print$/}
nice (not the formatting; the logic :-)
-r
--
--
http://www.cfcl.com/rdm
email: rdm@cfcl.com
phone: +1 650-873-7841
==== Want to unsubscribe from Fun With Perl? Well, if you insist...
==== Send email to <fwp-request@technofile.org> with message _body_
==== unsubscribe