delete perl