Daniel Sanchez Fabregas wrote:
>
> Triyng
>
> $x=qx(xcopy a:\\1*.* c:\\tmp);
> print"\n after \n$x \n before \n";
You could always use the File::Copy module.
perldoc File::Copy
John
--
use Perl;
program
fulfillment
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-ma
I think that XCOPY uses STDERR for some of its on-screen printing. You
could try to redirect that to a file and then read that in later:
open(STDERR,">errlog.txt");
should work.
-Original Message-
From: [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: 2/13/02 6:40 AM
Subject: Can't take
Triyng
$x=qx(xcopy a:\\1*.* c:\\tmp);
print"\n after \n$x \n before \n";
this is how it looks my dos session
C:\WINDOWS\Escritorio>perl -w kk.pl
13feb.zip
1 archivos copiados
after
before
-