unlink chmod utime kill can be merged into Perl_pp_chown().

p4raw-id: //depot/perl@25964

1 files changed, 20 insertions, 0 deletions

diff --git a/mathoms.c b/mathoms.c
index e814a80f89..659603769b 100644
--- a/mathoms.c
+++ b/mathoms.c
@@ -921,6 +921,26 @@ PP(pp_ftsvtx)
     return pp_ftrowned();
 }
 
+PP(pp_unlink)
+{
+    return pp_chown();
+}
+
+PP(pp_chmod)
+{
+    return pp_chown();
+}
+
+PP(pp_utime)
+{
+    return pp_chown();
+}
+
+PP(pp_kill)
+{
+    return pp_chown();
+}
+
 U8 *
 Perl_uvuni_to_utf8(pTHX_ U8 *d, UV uv)
 {