Add Racket implementation
Add Perl implementation and output