Hi, I tryed to run the script under perl 5.6 and it worked! 
Under versions 5.8 it doesn't work.

Does anybody know why?