NAME

HiPi::GPIO::PAD1

VERSION

Version 0.01

SYNOPSYS

    use HiPi::Constant qw( :pinmode );
    use HiPi::GPIO::PAD1;
   
    my $pad1 = HiPi::GPIO::PAD1->new;
    
    # Set RPi Pad 1 header pins 8 & 10 to output and value high
    
    for ( 8, 10 ) {
        $pad1->set_pin_mode($_, PIN_MODE_OUTPUT);
        $pad1->set_pin($_);
    }
     ...
     ...
    
    # we used the standard UART pins so we ought to set
    # them back to defaults
    
    $pad1->prepare_UART0();

DESCRIPTION

See pod for HiPi::GPIO for full usage and methods.

LICENSE

This work is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 3 of the License, or any later version.

License Note

I would normally release any Perl code under the Perl Artistic License but this module wraps several GPL / LGPL C libraries and I feel that the licensing of the entire distribution is simpler if the Perl code is under GPL too.

AUTHOR

Mark Dootson, <mdootson at cpan.org>

COPYRIGHT

Copyright (C) 2012-2013 Mark Dootson, all rights reserved.