system("D:/EudoraPro/Eudora.exe"); copy($_,'z:/mail_test') foreach glob 'D:/EudoraPro/*.mbx'; copy($_,'z:/mail_test') foreach glob 'D:/EudoraPro/*.toc';