Functions 

• Named units of functionality

sub min {
    my($x, $y) = @_;
    return $x > $y ? $y : $x;
}

say min(14, 9);     # 9