perl Clone