This will deal with something every shell/perl scripter has to deal with from time to time. How do I extract "whatever" from this file and just output my match?
and you just want to get the date.
It's relatively easy to do (although this case is far from challenging since the date format is so different than the rest of the lines).
First you need to figure out what you're not going to print out. So, after you read the file into an array and are iterating through it (or however you prefer to process your files with Perl), you'll first want to put this line in your loop.
This says don't do anything and continue to the next line if the pattern "\d(Any Decimal Character)\d\/(A forward slash - backslashed, since it's a special character)\d\d\/\d\d" isn't on the line.
Note that the $1 on the right hand side of the expression represents everything we've captured in between parentheses on the left hand side of the expression. We've basically substituted the entire line with the date :) And just so we see some output, we print the contents of $match (the date).