Or even shorter: say $variable unless $variable % 100;

(Note that say requires perl 5.10.0 and use 5.010; or use feature qw(say);).

Note that if you want to print out the variable without a newline at the end, you'll have to set $| to a true value for it to display immediately.

(Update: fixed markup, jethro++)