# module

sub perform {
    my ($x, $y) = @_;

    if ($x < 10){
        return $x + $y;
    }
    if ($x == 10){
        return $x * $y;
    }
  
    return $x - $y;
}