Others have told you how to do what you ask but I'd like to point out that at least 90% of the time when people think they want declare three or more scalars in the same place and assign then all the the same value they are wrong.
Usually they are making one or more of the following mistakes:
- Suffering from premature declaration. (i.e. not declaring all variables in the smallest applicable scope).
- Using multiple scalar variables where they should be using a hash or array.
- Representing the concept of undefindness using some value other than undef.
There's just been an almost identical thread over in comp.lang.perl.misc 