my $x = 3;
  print f($x);  # 'x'