David Precious writes:
> change "system" to "print" to print out the command that would be run,
Great suggestion! I actually did try that using echo instead of
print so that system was still involved and the values were
correct. It looked beautiful.
> and (a) you'll likely see the problem, or (b) you can try running that
> exact command.
>
>
> > system(
> > "mv $directories$filename \"$directories\"deleted_keys/"
> > );
>
> I doubt you meant that extraneous \" in the middle there - I suspect
> you meant \"$directories/deleted_keys\".
That didn't start out like that but I put the \ 's infront of
quotes to see if it would make any difference. It didn't.
> Oh, and make sure that the variables you're interpolating there aren't
> from an untrusted source :)
I have not had a chance to research that yet, but that might be
the problem. I am using strict as in
#!/usr/bin/perl -w
use strict;
use Time::Local;
use File::Basename;
I remember reading about how all the variables should be from
trusted sources but I'll have to remind myself what that means
again.
Thanks very much.
Martin McCormick
--
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]
http://learn.perl.org/
