"index" source code?

[ToddAndMargo via perl6-users]

Hi All,

Was the subroutine "index" written Perl6?  If so,
where can I view the source code?

Many thanks,
-T