make it work on perl 5.8
update Changes