$ERRORS.="unknown database(s)" if
@{$options{databases}} and
- grep {$_ !~ /^(?:ncbi|genecard|harvester)$/i} @{$options{databases}};
+ grep {$_ !~ /^(?:ncbi|genecard|harvester|ensembl)$/i} @{$options{databases}};
if (not length $options{results}) {
$ERRORS.="results directory not specified";
pod2usage($ERRORS) if length $ERRORS;
if (not @{$options{databases}}) {
- $options{databases} = [qw(ncbi genecard harvester)]
+ $options{databases} = [qw(ncbi genecard harvester ensembl)]
}
$DEBUG = $options{debug};