$x += SEVEN;

sub set_to_100 {
  $_[0]=100;
}
