in reply to HELP!!! Can't modify constant item in addition (+) at .....
alarmed there is what's called a bareword: since alarmed isn't a built-in function of perl or a function you've declared, it is treated as a string constant "alarmed". And trying to add to a constant gives you a Can't modify constant error.
(Using strict turns use of a bareword into a fatal error, but in this case the Can't modify constant error is given first anyway.)