print "$foo is divisible by $bar" if $foo % $bar == 0;