my $n = 534587;
print "even\n" if($n % 2 == 0);    # modulo operator of possibly a float or possibly an integer (*)