in reply to Deleting by Age!

Is this the script that you use for this task? What do you get as output? I guess it dies at line 26 saying something like Can't use string ("whatever") as symbol ref while "strict refs" in use.

What do you get? Could you post the error messages along with "it doesn't work?"

You do

use Win32; use Win32::NetResource; use Time::localtime;
but you do not use anything of those modules whatsoever. What gives? Along with the poor formatting it makes one setence of a professor spring into my mind: "Not only is this all incomprehensible, but the ink is ugly, and the paper is from the wrong kind of tree." ;-)

Please post the output of that script.

--shmem

_($_=" "x(1<<5)."?\n".q·/)Oo.  G°\        /
                              /\_¯/(q    /
----------------------------  \__(m.====·.(_("always off the crowd"))."·
");sub _{s./.($e="'Itrs `mnsgdq Gdbj O`qkdq")=~y/"-y/#-z/;$e.e && print}