Re: Last night's meeting

[David L. Nicol]

> Garrett Goebel wrote:
...
> By anonymous micropayments... I am meaning a cost effective means of
> making very small payments over the internet. Presumably with the ability
> to protect the anonymity of the person making the payment. This is by no
> means a beginner topic, but would be an interesting one. The hope would
> be to isolate a beginner topic and present it in the context of anonymous
> micropayments.

kc.pm.org's web site is sponsored by tipjar.com, so here's the shameless
plug:

You can initiate an anonymous five cent tipjar transaction from
[EMAIL PROTECTED] to [EMAIL PROTECTED] with the following piece of core perl:


           my $amo = 0.05;
           my $rec = '[EMAIL PROTECTED]';
           my $fro = '[EMAIL PROTECTED]'; 
           my $mes = 'here is a micropayment';
           my $anon = '&ANON=yes';
        

           use Socket;
           my ( $iaddr, $paddr, $line);
           $iaddr   = inet_aton('www.tipjar.com') || die 'DNS problem';
           $paddr   = sockaddr_in(80, $iaddr);
           $proto   = getprotobyname('tcp');
           socket(SOCK, PF_INET, SOCK_STREAM, $proto)  || die "socket: $!";
           connect(SOCK, $paddr)    || die "connect: $!";

        
           foreach ($amo,$rec,$fro,$mes){
                s/([^\w ])/sprintf('%%%X2',ord($1))/ge;
                s/\ /+/g;
           };

           print SOCK "get
/cgi-bin/dogive?fro=$fro&rec=$rec&amo=$amo&mes=$mes$anon";
           
           # get at least one line of response
           $line = <SOCK>;
           close (SOCK)            || die "close: $!";


I've been dragging my feet about wrapping that into 

        Business::OnlinePayment::TipJar 

and submitting it to CPAN since at least 1998.






> So I hope what we are talking about here is potentially having more than
> one meeting a month? One track of meetings focused on beginners, and
> another on intermediate to advanced topics. I would sorely miss it if the
> intermediate to advanced topics were to disappear.
> 
> Whatever is decided, I'd be willing to help with one or two beginner
> level presentations in the next 12 months. I'm not a perl web expert by
> any means, but I'd welcome the chance to hone my fundamentals to the
> point where I'd feel comfortable covering them in a presentation.
> 
> Garrett


I hereby nominate Garrett Goebel as the Official Training Facilitator of
the Kansas City Perl Mongers.  Without objection he will be so appointed.



-- 
                                           David Nicol 816.235.1187
                         Ikki ikki ikki ikki ptang ptang neighwhum!