wendy wrote:
>
> this perl script is to download file from the server to client PC and it
> can be done.
>
> open(checkoutfile, $temp2) || die "Cannot open file";
> print "Content-Disposition: attachment; filename=$filename1\n";
> print "Content-Type: application/biller\n\n";
>
> while(<checkoutfile>)
> {
> print "$_";
> }
>
> close(checkoutfile);
>
> but after i add in a system() to run a dos command in perl before the above
> script it come to an error. the script i insert like this:
>
> $temp1 = "c:\\e-BX\\Repository\\In\\Rcs\\".$filename1;
> $temp2 = "c:\\e-BX\\Repository\\Rcs\\".$filename1;
> system("COPY $temp1 $temp2");
>
> and it works to copy the file from location temp1 to temp2
> but after this the another script to download the file to client PC didn't
> work and return the error message: internal server error. Why and How i am
> going to solve this problem?
Try dropping the system call and use File::Copy instead. If you still have
problems - repost.
--
,-/- __ _ _ $Bill Luebkert ICQ=14439852
(_/ / ) // // DBE Collectibles http://www.wgn.net/~dbe/
/ ) /--< o // // Mailto:[EMAIL PROTECTED] http://dbecoll.webjump.com/
-/-' /___/_<_</_</_ http://www.freeyellow.com/members/dbecoll/
---
You are currently subscribed to perl-win32-users as: [archive@jab.org]
To unsubscribe, forward this message to
[EMAIL PROTECTED]
For non-automated Mailing List support, send email to
[EMAIL PROTECTED]
