Select Code to Download

package Tinia_CanPwm;

@Tinia_CanPwm::ISA = qw (Tinia_CanExtender);

sub set {
    my ($self, $state,$set_by) = @_;