my @files_sorted = sort { substr($a,-14,10) cmp substr($b,-14,10) } (glob('yourpath/bobby*.txt'));
my $latest_file = $files_sorted[-1];