Select Code to Download

for (-1, 4096){
    is
...

    like $@, qr/address parameter out of range/, "...and error is sane
+";
}

plan skip_all => "i2c bus currently disabled for other purposes";

if (! $ENV{SERIAL_ATTACHED}){
    plan skip_all => "The damned serial port shorted out!";
}

my $min_tpc = 1.08;
eval "use Test::Pod::Coverage $min_tpc";
plan skip_all => "Test::Pod::Coverage $min_tpc required for testing PO
+D coverage"
    if $@;