Don't use $b, in fact don't use single letter variable names, EVER!. Besides $a, $b being special Perl variables for use with sorting, it is totally ambiguous. It does not tell you want is supposed to be there and creates maintenance headaches.

Be polite and spell out what the variable is supposed to represent and the next time you look at this code, you will be able to quickly identify what it is supposed to do.