http://bugs6.perl.org/rt2/Ticket/Display.html?id=15893 shows the - heated - discussion about this issue, with patch. If I were you, I'd try the patch :-)

Joost.

-- 
#!/usr/bin/perl -np
BEGIN{@ARGV=$0}s(^([^=].*)|=)()s;
=Just another perl hacker\
[download]