Mousetrap solutions

Mousetrap was solved using Perl by 1 contestant.