Many thanks to all 3 who replied. You've given me more things to
try. For one brief shining moment, I thought the very first
suggestion had fixed the problem but I neglected to put the
"or die!;" clause at the end of the line and it's still the same
silent failure.
For now, I will use the system commands which do the job
quickly enough for what I need and research the perl way some
more.
I have been doing perl scripts for 10 years, now, and really
like it when I can use it due to the rather fast turn-around time
between an idea and a working program.
I had been leaving off the third parameter for buffer
since it is listed as optional. I assume I don't have to put
another , for that field since the default size is probably good
enough.
Martin
Jim Gibson <[email protected]> writes:
> That should be
>
> dircopy( ("\"weekly\”", "\"/weekly/\"" );
>
> It looks like you are giving dircopy only one argument: "\"weekly\",
> \"/weekly/\””. The profile for dircopy is:
>
> dircopy( $orig, $new, [$buf] );
>
> To debug the probem further, write a short-as-possible program that
> copies a directory. Something like:
>
> use strict;
> use File::Copy::Recursive qw(dircopy);
> my $orig = “…”;
> my $new = “…”;
> dircopy( $orig, $new );
>
> and see what happens.
>
> An easier way to generate a string with embedded quote signs is to use
> the q (single quote) or qq (double quotes) functions:
>
> my $double_quotes = qq("weekly", "/weekly/”);
>
> Jim Gibson
> [email protected]
>
>
>
>
--
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]
http://learn.perl.org/
