On Thursday, August 8, 2002, at 02:00 , <[EMAIL PROTECTED]> wrote:
[..]
> Maybe I'm missing something obvious... but in Perldoc for File::Copy I
> read: "The copy function takes two parameters: a file to copy from and
> a file to copy to."
for fun you might want to do the
perldoc -m File::Copy
and see how the sausage is made...
since it is basically about 'read the input file' and
write it out to the output file - using 'syscopy' - which
is implemented in the Win32 space with
Win32::CopyFile(@_, 1);
which you may wish to look at...
alternatively let's move along....
what you want is something that does
dump_across file1 file2 file3 outputfile
that would be:
#!/usr/bin/perl -w
use strict;
my $outFile = pop @ARGV;
open(OUT, "> $outFile") or die "unable to open output file $outFile
:$!\n";
for my $file (@ARGV) {
open(IN, "$file") or die "unable to open input file $file :$!\n";
print $OUT $_ while(<IN>) ;
close(IN);
}
close(OUT);
you wil of course need to tweek that for the Win32 environment,
since you will probably want to deal with how to make sure that
it reads and writes appropriately - but I think you get the main drift.
[..]
ciao
drieux
---
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
