Recursively copy perl data types