cpan you have to see

Mark Overmeer mark at
Wed Dec 12 11:15:02 GMT 2012

* Avishalom Shalit (avishalom at [121212 11:01]:
> How do I sort an array in reverse?
>         @sorted = sort reverse @array;

I do understand the jokes, because I have sufficient knowledge of Perl.
Horrible things get used.

Now guess: is the following a joke or in production code?

       last CHECKSHIPPING unless $Vend::Cfg->{TaxShipping};
       foreach $code (@code) {
           next unless $Vend::Cfg->{TaxShipping} =~ /\b\Q$code\E\b/i;
           $amount += tag_shipping();


       Mark Overmeer MSc                                MARKOV Solutions
       Mark at                          solutions at         

More information about the mailing list