yay reCAPTCHA for the Catalystframework

Posted by Stefan Schmidt Wed, 03 Oct 2007 18:15:00 GMT

Since i read about reCAPTCHA in a friends blog and started a project in perl’s Catalyst Framework i was missing a reCAPTCHA plugin for Catalyst. Here it is.

Hooray everybody.

Posted in ,  | Tags  | no comments | no trackbacks

Its Groundhog Day!...

Posted by Stefan Schmidt Thu, 26 Jul 2007 22:01:00 GMT

…err i mean: Its System Administrator Appreciation Day!!!

Yes i know the date on this image is wrong, but i am not allowed to temper with it and post it online as its copyrighted, go ahead suit yourself.

Get yer tickets here and here. ;-)

No, i don’t want any flash ecards, thank you.

Ok enough already, lets greet the sysadmin future alright?

Posted in , ,  | no comments | no trackbacks

some are just, err...

Posted by Stefan Schmidt Fri, 30 Mar 2007 22:34:00 GMT

In me previous article i linked to another blog where some german bloke keeps all his entries in morse code.

I posted a comment there in which i wrote something in morse code and added the lines of perl code listed below.

He just emailed me that he deleted the comment for he does not have any clue about what that code does, this is just another example where the effects of german law really disappoint me.

While it does not thrill me i can understand his decision as there were some contradicting court rulings on whether the operator of a forum is legally responsible for the utterances of its users.

However, if you want to ‘read’ his blog on a debian system just do an “apt-get install bsdgames” and run the following perl scripts:

demorse.pl

#!/usr/bin/perl
use strict;
use warnings;
while (my $l=<STDIN>) {
        chomp $l;
        my @ary=split(/\|/,$l);
        foreach my $part (@ary) {
                my @res=`echo \"$part\" | /usr/games/morse -d 2>&1`;
                foreach my $val (@res) {
                        chomp $val;
                        print "$val ";
               }
        }
        print "\n";
}

enmorse.pl

#!/usr/bin/perl
use strict;
use warnings;
while (my $l=<STDIN>) {
        chomp $l;
        my @ary=split(/\s+/,$l);
        foreach my $part (@ary) {
                my @res=`echo \"$part\" | /usr/games/morse -s 2>&1`;
                foreach my $val (@res) {
                        chomp $val;
                        print "$val";
                }
                print " | ";
        }
        print "\n";
}

Posted in ,  | Tags  | 1 comment | no trackbacks

some people are just weird...

Posted by Stefan Schmidt Fri, 30 Mar 2007 17:21:00 GMT

… and some like to make their lifes extra hard for themselves.

At least thats what i thought when i read those comments after writing a short perl script that decoded the morse code.

Warning: This link uses german morse code. ;-)

Posted in ,  | no comments | 1 trackback

It is done

Posted by Stefan Schmidt Wed, 31 May 2006 10:40:00 GMT

Welcome to my reincarnated blog.

Yeah i know i said in my old blosxom blog that because blosxom is so awfully memory leaking that it cannot be run under mod_perl i would write my own blog in perl.

But ok i admit it i’m lazy and i would never have gone to the lengths of creating something as fancy as this typo blogging software - it even uses ajax animations when writing an article - and i like fancy web stuff, so thats it now. Feel free to subscribe any feeds until i figure typo is badly written too… ;-)

First hints on that could be that nobody even dares to run it on mod_ruby and that blog hosters are complaining about its memory usage on FastCGI. Oh well, we’ll see…

Posted in , ,  | no comments | no trackbacks