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: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/


Reply via email to