Uncomment "use strict", add "use warnings", and change those "our" variables to "my" variables. The values of $userid and $status will persist if you use our.