eval help needed.

[Steve]

I have this code running under Windows 98 using ActiveState:
The file copy is working okay. What isn't working is the eval system call. Eudora is never executed and run, BUT the copy always happens. How can I get Eudora to be called? Is it possible at all?

use File::Copy;
use File::DosGlob qw(glob);
eval {
system(`D:/EudoraPro/Eudora.exe`)
};
print $@;
unless ($@) {
copy($_,'z:/mail_test') foreach glob 'D:/EudoraPro/*.mbx';
copy($_,'z:/mail_test') foreach glob 'D:/EudoraPro/*.toc';
}



-----

The three most dangerous things are a programmer with a soldering iron, a manager who codes, and a user who gets ideas.

----

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]