- if( !exists $cache{old_docs_versions} ){
- my @versions;
- foreach( glob("$opt{docroot}/exim-html-*") ){
- push @versions, $1 if /-(\d+(?:\.\d+)?)$/ && $1 < $opt{latest} && -d $_;
- }
- $cache{old_docs_versions} = [reverse sort {$a<=>$b} @versions];
- }
- return @{$cache{old_docs_versions}};
+ if ( !exists $cache{old_docs_versions} ) {
+ my @versions;
+ foreach ( glob("$opt{docroot}/exim-html-*") ) {
+ push @versions, $1 if /-(\d+(?:\.\d+)?)$/ && $1 < $opt{latest} && -d $_;
+ }
+ $cache{old_docs_versions} = [ reverse sort { $a <=> $b } @versions ];
+ }
+ return @{ $cache{old_docs_versions} };