The Ternary Conditional Operator

my $time_suffix_1 = afternoon(localtime)
               ? 'afternoon'
               : 'morning';
# equivalent to
my $time_suffix_2;
if (afternoon(localtime)) {
   $time_suffix_2 = 'afternoon';
}
else {
   $time_suffix_2 = 'morning';
}
# testing code
# both expressions are equivalent
say "It is $time_suffix_1 time" if $time_suffix_1 eq $time_suffix_2;
# checks if it's afternoon
sub afternoon {
   my $hour = $_[2];
   return 1 if $hour > 12 && $hour < 17;
}