in reply to
Free online Perl Practice tests
you can also visit BrainBench
You could, as long as the OP wasn't really serious when they said "free".
Because BrainBench isn't.
s**lil*; $*=join'',sort split q**; s;.*;grr; &&s+(.(.)).+$2$1+; $; =
qq-$_-;s,.*,ahc,;$,.=chop for split q,,,reverse;print for($,,$;,$*,$/)
Results (358 votes),