sub multiply { $_[0] * $_[1] }