in reply to output differs in perl version

So, how does it fail under Perl 5.8.8 (which is about 5 years and three major releases old by now)?

Also see How do I post a question effectively?