Change .perl to .raku in examples in doc/Type/Numeric.pod6

Author: Prince213

doc/Type/Numeric.pod6

@@ -65,7 +65,7 @@ as accurately as is possible. Fail with C<X::Numeric::Real> otherwise.
 Returns the number converted to the narrowest type that can hold it without
 loss of precision.
 
-    say (4.0 + 0i).narrow.perl;     # OUTPUT: «4␤»
+    say (4.0 + 0i).narrow.raku;     # OUTPUT: «4␤»
     say (4.0 + 0i).narrow.^name;    # OUTPUT: «Int␤»
 
 =head2 method ACCEPTS