sub sum2cubes {
  my @cube = @_; # more meaningful than $a and $b
  return($cube[0] ** 3 + $cube[1] ** 3);
}
print sum2cubes(3,4);