use experimental 'signatures';
sub multiply ($x, $y) {
    return $x * $y;
}