sub foo $x $y { $x * $y }