diff --git a/perl-xCAT/xCAT/Table.pm b/perl-xCAT/xCAT/Table.pm
index f5e55637f..c86e00af3 100644
--- a/perl-xCAT/xCAT/Table.pm
+++ b/perl-xCAT/xCAT/Table.pm
@@ -1425,6 +1425,12 @@ sub _clear_cache { #PRIVATE FUNCTION TO EXPIRE CACHED DATA EXPLICITLY
     }
     #it shouldn't have been zero, but whether it was 0 or 1, ensure that the cache is gone
     $self->{_use_cache}=0; # Signal slow operation to any in-flight operations that may fail with empty cache
+    if (ref $self->{_tablecache}) {
+        undef %{$self->{_tablecache}};
+    }
+    if (ref $self->{_nodecache}) {
+        undef %{$self->{_nodecache}};
+    }
     undef $self->{_tablecache};
     undef $self->{_nodecache};
 }