File Coverage

blib/lib/Lab/Moose/Instrument/Agilent34460A.pm
Criterion Covered Total %
statement 11 11 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 15 15 100.0


line stmt bran cond sub pod time code
1             package Lab::Moose::Instrument::Agilent34460A;
2             $Lab::Moose::Instrument::Agilent34460A::VERSION = '3.880';
3             #ABSTRACT: Agilent 34460A TrueVolt series digital multimeter.
4              
5 1     1   2761 use v5.20;
  1         4  
6              
7              
8 1     1   7 use warnings;
  1         5  
  1         39  
9 1     1   6 use strict;
  1         2  
  1         25  
10              
11 1     1   6 use Moose;
  1         2  
  1         63  
12              
13             extends 'Lab::Moose::Instrument::HP34410A';
14              
15             # this still needs a bit of research
16             #
17             #around default_connection_options => sub {
18             # my $orig = shift;
19             # my $self = shift;
20             # my $options = $self->$orig();
21             # my $usb_opts = { vid => 0x2a8d, pid => 0x0201 };
22             # $options->{USB} = $usb_opts;
23             # $options->{'VISA::USB'} = $usb_opts;
24             # return $options;
25             #};
26              
27             __PACKAGE__->meta()->make_immutable();
28              
29             1;
30              
31             __END__
32              
33             =pod
34              
35             =encoding UTF-8
36              
37             =head1 NAME
38              
39             Lab::Moose::Instrument::Agilent34460A - Agilent 34460A TrueVolt series digital multimeter.
40              
41             =head1 VERSION
42              
43             version 3.880
44              
45             =head1 DESCRIPTION
46              
47             Inherits from L<Lab::Moose::Instrument::HP34410A>
48              
49             =head1 COPYRIGHT AND LICENSE
50              
51             This software is copyright (c) 2023 by the Lab::Measurement team; in detail:
52              
53             Copyright 2020 Andreas K. Huettel
54              
55              
56             This is free software; you can redistribute it and/or modify it under
57             the same terms as the Perl 5 programming language system itself.
58              
59             =cut