perl discussion