The following code was used to delete log files older than x days. You should be able to modify it for your purposes. It's not state of the art (pretty old and designed to be supported by non perl experts so don't take it as gospel). 

    ### -------------------------------
    ### Read local directory
    opendir LOCALDIR, $location || 
        croak "Unable to open: $location because $!";

    @local_files = readdir LOCALDIR;

    foreach $file (@local_files){

        ### Don't try to delete directories
        if ($file eq '.' || 
            $file eq '..' ||
            -d "$location$file" ) {
           next;
        }

        ### Test the age of each file in the directory and delete
        ### if too old (N.B. need to prepend directory to find file an
+d 
        ### use unlink for OS portable deletion).

        if ( -M "$location$file" <= $age) {
            $p_debug && 
                print "$file is ok, only ", 
                    -M "$location$file", " days old\n";
        } else {
            $p_debug && 
                print "$file is too old, it's ",
                    -M "$location$file", " days old\n";
            unlink("$location$file") || 
                croak "Unable to delete: $location$file because: $!";
        }
    }

[download]

You could use something like: 

        ### Move each file into archive directory
        move( "$location$file", "$target$file") || 
        croak "Unable to move: $location$file because: $!";

[download]

... the above to move files around. You'll need to rename the $file for the target however.

In reply to Re: Modified Date, file renaming by Mungbeans
in thread Modified Date, file renaming by ManicMantis

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.