projects
/
Biblio-RFID.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
66938c113ced32f0b3afa35eb50112c56595007a
[Biblio-RFID.git]
/
t
/
10-3M-810.t
1
#!/usr/bin/perl
2
3
use Test::More tests => 3;
4
use Data::Dump qw(dump);
5
6
use lib 'lib';
7
8
BEGIN {
9
use_ok( 'RFID::Serial::3M810' );
10
}
11
12
ok( my $o = RFID::Serial::3M810->new( device => '/dev/ttyUSB0' ), 'new' );
13
14
ok( my $inventory = $o->inventory, 'inventory' );
15