File: new_from_registry

package info (click to toggle)
libbio-das-lite-perl 2.11-9
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 468 kB
  • sloc: xml: 1,299; perl: 1,152; makefile: 31
file content (14 lines) | stat: -rwxr-xr-x 358 bytes parent folder | download | duplicates (4) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
#!/usr/bin/perl -wT
use strict;
use lib qw(lib ../lib);
use Bio::Das::Lite;

my $bdl = Bio::Das::Lite->new_from_registry({
					   'capability' => ['features'],
					   'category'   => ['Protein Sequence'],
					  });


print qq(Using Bio::Das::Lite v$Bio::Das::Lite::VERSION configured with registry DSN list:\n),
  join("\n", sort @{$bdl->dsn()}),
  "\n";