Fix constant usage to avoid error on perl 5.6.x.
Add change.