I have just placed a node onto the Craft page. The different file and folder paths have been changed to violate the innocent. It is my first "real" Perl program. I am using it to access a folder every 180 seconds (give or take a few seconds for the program to complete). It makes a list of all the files in this folder with a .txt, .doc, .mta, .mpd extension. It waits (sleeps) 3 minutes then goes to the folder and copies these to two (or three depending on the report or file) other folders changing the extension of the .doc and .mta files. (These are ASCII files so there is not any data corruption.) It then deletes these files off of this location. The reason for the 3 minute delay is due to the fact that these files are being ftp'ed from a mainframe to here. My supervisor wanted the three minute delay to ensure that a file was not being copied or deleted before it was done being ftp'ed. A list is made of the files copied. This list is compared with another list made from a folder of batch files. When there is a match yet another list (or array) is made to run the batch file which process the data in the file. The purpose of my design was to make it easy for other programmers here in the office to write up batch file and just place them out on the specific drive and the only other updates that need to take place are upon the shoulders of the mainframe programmers to get the file out on the respected location. I would appreciate someon taking a look at the program and tell me if there are any ways that I can make this more efficient. And please keep in mind that this is from a someone who only just started learning perl. The name of the program is a program to go find documents in a file then copy them to seperate folders, delete them from the original folder, then run a batch to process the individual files with their respected batch files. I hope there is no problem ffinding it I did not want to take up that much extra room on this page. Thanks. And everyone have a good weekend. Blacksmith.

In reply to I need a critic (well actually just someone to give some constructive advice) by blacksmith

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.