in reply to variable constructs that I do not understand
There isn't any context there, but it looks to me like some evil code concocted by somebody who doesn't know that Perl allows you to use arrays... and they decided to have variables named $floor1 $floor2 and so on.
In Section
Seekers of Perl Wisdom