You are getting output, but it's being buffered. Add a "\n" to the print or add $|=1 somewhere before the loop to disable buffering.

By the way, you shouldn't use $a as a variable. It has a special meaning for certain function such as sort, and doing my $a screws things up.