in reply to Strict scripts

You can use constants by declaring them with "use constant". See the perldoc