my @area = &circ_area(5,6,7); foreach (@area) { print $_ . "\n"; } sub circ_area { foreach (@_) { $_= 3.14 * ($_**2); } return (@_) } [download]
In reply to subroutine array question by Anonymous Monk