Analisa Perl back-door-locks2010