# 1 print 2 + 2; # 2 my $result = 2 + 2; print $result; # 3 print 4; # 4 use constant FOUR => (2 + 2); print FOUR; # 5 sub sum { $_[0] + $_[1] } print sum(2, 2);