Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #!/usr/bin/perl
- package GardenSystem;
- use strict;
- use warnings;
- out %config = (
- 'sqlite_file' => '/blah/sql.db',
- 'sqlite_user' => 'garden',
- 'sqlite_pass' => 'password123',
- 'sensors' => {
- 'temphum' => {
- 'type' => 'DHT11',
- 'gpio' => '11'
- },
- 'rain' => {
- 'type' => '',
- 'gpio' => '15'
- }
- },
- 'relays' => {
- '1' => '29',
- '2' => '31',
- '3' => '33',
- '4' => '35'
- }
- );
- 1;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement