Select Code to Download

8_2007_5_22_15_34_23_Table_-_2007522_XYZ_W3.pdf
8_2007_5_22_22_34_12_Table_-_2007522_XYZ_W3.pdf

use Date::Parse;

...
{
 print "$file1 is more recent than $file2\n";
}