in reply to Re: Re: read copy and moving files
in thread read copy and moving files

If you're using it via CGI you'll probably want to use CGI and print HTTP headers using CGI. I think that's your problem.
use CGI;

print CGI->new->header;

[download]


At the top should suffice.
perldiag points to several sources, stating that this is a CGI error.
As this is an alien error, use diagnostics could have not explained forther.
see perldoc perldiag, and search it for "Server error" for more details.

P.S. You should really use File::Copy, as it's a simpler interface, and platform independant (at least externally, i dunno about it's guts). The code I gave was just to show you how it can be done manually.

-nuffin
zz zZ Z Z #!perl

Replies are listed 'Best First'.
Re: Re: Re: Re: read copy and moving files
by softworkz (Monk) on Oct 17, 2002 at 15:12 UTC
    On a windows 2000 machine you could do it this way. 
    #!/usr/bin/perl -w

use strict;
my $dir = "C:\\TEMP\\";
my $outdir = "C:\\temp2\\";

opendir (DIR, $dir) || die "can't open $dir: $!"; 
my @files = readdir(DIR);
close(DIR);

foreach (@files) {
# change the extension to one of your liking
    if ($_ =~ /.log/) {
        system ("copy $dir\\$_ > $outdir\\$_");
    }

}

    [download]
[reply]
[d/l]

In Section Seekers of Perl Wisdom