A simple captcha breaker writen in Perl