diff --git a/perl-netcmdutf8.diff b/perl-netcmdutf8.diff
index c41645f..d212e3c 100644
--- a/perl-netcmdutf8.diff
+++ b/perl-netcmdutf8.diff
@@ -6,7 +6,7 @@
  
 +    # encode to individual utf8 bytes if
 +    # $str is a string (in internal UTF-8)
-+    utf8::encode($str) if is_utf8($str);
++    utf8::encode($str) if utf8::is_utf8($str);
 +
      $cmd->debug_print(1, $str)
        if ($cmd->debug);
@@ -17,7 +17,7 @@
  
 +  # encode to individual utf8 bytes if
 +  # $line is a string (in internal UTF-8)
-+  utf8::encode($line) if is_utf8($line);
++  utf8::encode($line) if utf8::is_utf8($line);
 +
    return 1
      unless length($line);