[ CORE::sort { $sub->($a, $b) } @$array ];
}
+sub first {
+ $_[0]->[0];
+}
+
+sub last {
+ $_[0]->[$#{$_[0]}];
+}
+
## ::Indexed implementation
sub at {
=item B<flatten_deep ($depth)>
+=item B<first>
+
+=item B<last>
+
=back
=head2 Indexed implementation