Return-Path: Delivered-To: apmail-cocoon-dev-archive@www.apache.org Received: (qmail 84961 invoked from network); 2 Sep 2005 15:50:31 -0000 Received: from hermes.apache.org (HELO mail.apache.org) (209.237.227.199) by minotaur.apache.org with SMTP; 2 Sep 2005 15:50:31 -0000 Received: (qmail 71291 invoked by uid 500); 2 Sep 2005 15:50:28 -0000 Delivered-To: apmail-cocoon-dev-archive@cocoon.apache.org Received: (qmail 71229 invoked by uid 500); 2 Sep 2005 15:50:27 -0000 Mailing-List: contact dev-help@cocoon.apache.org; run by ezmlm Precedence: bulk list-help: list-unsubscribe: List-Post: Reply-To: dev@cocoon.apache.org List-Id: Delivered-To: mailing list dev@cocoon.apache.org Received: (qmail 71216 invoked by uid 99); 2 Sep 2005 15:50:27 -0000 Received: from asf.osuosl.org (HELO asf.osuosl.org) (140.211.166.49) by apache.org (qpsmtpd/0.29) with ESMTP; Fri, 02 Sep 2005 08:50:27 -0700 X-ASF-Spam-Status: No, hits=0.0 required=10.0 tests= X-Spam-Check-By: apache.org Received-SPF: pass (asf.osuosl.org: local policy) Received: from [209.132.96.45] (HELO skutsje.san.webweaving.org) (209.132.96.45) by apache.org (qpsmtpd/0.29) with ESMTP; Fri, 02 Sep 2005 08:50:41 -0700 Received: from skutsje.san.webweaving.org (skutsje.san.webweaving.org [209.132.96.45] (may be forged)) by skutsje.san.webweaving.org (8.12.9/8.12.9) with ESMTP id j82FoP5O004666 (version=TLSv1/SSLv3 cipher=DHE-RSA-AES256-SHA bits=256 verify=NO) for ; Fri, 2 Sep 2005 08:50:25 -0700 (PDT) (envelope-from dirkx@webweaving.org) Received: from localhost (dirkx@localhost) by skutsje.san.webweaving.org (8.12.9/8.12.9/Submit) with ESMTP id j82FoPaW004663 for ; Fri, 2 Sep 2005 08:50:25 -0700 (PDT) (envelope-from dirkx@webweaving.org) X-Authentication-Warning: skutsje.san.webweaving.org: dirkx owned process doing -bs Date: Fri, 2 Sep 2005 08:50:25 -0700 (PDT) From: Dirk-Willem van Gulik X-X-Sender: dirkx@skutsje.san.webweaving.org To: dev@cocoon.apache.org Subject: Re: Warped Text... (off topic) In-Reply-To: <7CFE1CB2-0C7D-476D-8E63-6BFE63FA766C@betaversion.org> Message-ID: <20050902083409.N80548@skutsje.san.webweaving.org> References: <6A9B0225-C36E-48AB-B2FB-6137BB0C8E06@betaversion.org> <7557e99f05090208231f1b6926@mail.gmail.com> <7CFE1CB2-0C7D-476D-8E63-6BFE63FA766C@betaversion.org> MIME-Version: 1.0 Content-Type: TEXT/PLAIN; charset=US-ASCII X-Virus-Checked: Checked by ClamAV on apache.org X-Spam-Rating: minotaur.apache.org 1.6.2 0/1000/N On Fri, 2 Sep 2005, Pier Fumagalli wrote: > > http://agylen.com/2005/05/16/captcha-validator-for-cocoon-forms/ > > > > Ciao, > > Yep, but SVG IMVHO is quite overkill to generate a simple image... For something really simple: sub getBCD { $_ = (123567,36,13457,13467,2346,12467,24567,136,1234567,12346)[ shift @_ ]; return (((m/1/) ? ' _ ' : ' '), ((m/2/) ? '|' : ' '). ((m/4/) ? '_' : ' '). ((m/3/) ? '|' : ' '), ((m/5/) ? '|' : ' '). ((m/7/) ? '_' : ' '). ((m/6/) ? '|' : ' ')); }; map { my @r = getBCD($_); map { $out[ $_ ] .= $r[$_].' '; } (0 .. 2); } '3231' =~ m/./g; print join("\n",@out); Just kidding. Dw.