Try this. It could be made more specific if the rest of the characters are always digits, but I've stuck to your written description of requirements.

@matched = grep /^nc\d\d.*\.log$/, @files
[download]

Would this syntax be correct:

@files = grep {/^nc$year.*\.log$/} @files;
[download]

or

@files = grep {/^nc.$year.*\.log$/} @files;
[download]

Where the $year is the 2 digit number of the year I am in??

-----------------------
Billy S.
Slinar Hardtail - Hand of Dane
Datal Ephialtes - Guildless
RallosZek.Net Admin/WebMaster



perl -e '$cat = "cat"; if ($cat =~ /\143\x61\x74/) { print "Its a cat!
+\n"; } else { print "Thats a dog\n"; } print "\n";'
[download]

The former looks right to me, though the easiest way is to check is to try it:)

Why did you think that you might need the extra '.' in the latter?

---

Examine what is said, not who speaks.

Thank you... Your nudge got me in the right direction. here is the code I am using: @files = grep {/^nc$digyear$digmon.*\.log$/} @files; Works like a charm :)

-----------------------
Billy S.
Slinar Hardtail - Hand of Dane
Datal Ephialtes - Guildless
RallosZek.Net Admin/WebMaster



perl -e '$cat = "cat"; if ($cat =~ /\143\x61\x74/) { print "Its a cat!
+\n"; } else { print "Thats a dog\n"; } print "\n";'
[download]

This is just a slight optimization - read up on qr// in perlop to get the full scoop.

$match = qr/^nc$digyear$digmon.*\.log$/;
@files = grep m/$match/, @files;
[download]

---

Fun Fun Fun in the Fluffy Chair