Referring to options 

my $vpro = Davis::VantagePro->new($device);
my $vpro = Davis::VantagePro->new( $opt{device} );