I am using a config file to reference directories that are searched for files that are older than the number of days also listed in the config file. If any meet the criteria, they are gzip'd. I am attempting to use opendir to view the current directory being searched, followed by grep on the pattern specified in the config file identified as $pattern in my script. I'm kinda stuck on this and could use some suggestions or ideas. Thanks.
opendir(TARGET, ".") or die "Can't open current directory: $!"; my @targets= grep $pattern readdir TARGET; my $gzip_count = 0; foreach my $target (@targets) { my $cnt = 0; if (-M $target > $expiration) { $gzip_count++; $cnt = `gzip $target`; } }
Thanks si_lence, Your suggestion worked, and now I can move on. Appreciate the immediate response.

In reply to Opendir and regex by homer

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.