use warnings;
use strict;

print((sort { -M $a <=> -M $b } grep { -f } glob 'catalina.*')[0], "\n");