diff --git a/mysql-test/lib/My/Platform.pm b/mysql-test/lib/My/Platform.pm
index 658e7c7eaef..96e22e54ded 100644
--- a/mysql-test/lib/My/Platform.pm
+++ b/mysql-test/lib/My/Platform.pm
@@ -64,6 +64,11 @@ BEGIN {
 #  in cygwin perl (that uses unix paths)
 #
 
+use Memoize;
+memoize('mixed_path');
+memoize('native_path');
+memoize('posix_path');
+
 sub mixed_path {
   my ($path)= @_;
   if (IS_CYGWIN){
@@ -76,7 +81,6 @@ sub mixed_path {
   return $path;
 }
 
-
 sub native_path {
   my ($path)= @_;
   $path=~ s/\//\\/g
@@ -84,7 +88,6 @@ sub native_path {
   return $path;
 }
 
-
 sub posix_path {
   my ($path)= @_;
   if (IS_CYGWIN){