Once the threads are closed, perl stays at that memory size until the process has exited.

Or until you join the threads, join for threads , it makes the memory reclaimable