my ( $first, $second, $third ) = @array;