sub f ($x where * < 10*$y) { ... }