The problem I see with this is that what the proficient Perl programmer may consider beautiful, may be impenetrable to the uninitiated. Consider this little gem posted by japhy:

# randomize, via Fisher-Yates
@array[-$i,$j] = @array[$j,-$i] while $j = rand(@array - $i), ++$i < @
+array;
[download]

or the more pedestrian, but IMO very pretty:

@no_repeats = do { my %h; grep !$h{$_}++, @with_repeats };
[download]

Even Perl initiates freak out at stuff like this.

So I don't know how much appreciation you will get from those that don't know Perl. But for those of us who do know some Perl, it will be quite a treat.