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; $file1 = '2019-3-25T14:40:22'; $file2 = '2019-6-12T22:34:8'; if (str2time( $file1 ) - str2time( $file2 )) { print "$file1 is more recent than $file2\n"; }