That last bit is a subroutine prototype in Perl. See perlsub for more information. It's generally not used very widely nor accepted as a best practice, but it can give you some clues on what the subroutine might be expecting.
In this case, I believe ($;$) is the prototype for 2 scalar values.