sub function_x {
  print $x;
}

function_tiger(); # yields "tiger"