$water_filter->current_waste_count( $current_reading ); print "Current Waste Count: ", $current_reading, " (high: >= ", $waste_threshold, ")\n"; if ( $water_filter->is_cylinder_dirty ) { print " !! Filtering cylinder is dirty!\n"; print " Cleaned the filter!\n"; $water_filter->clean_cylinder; } else { print " Filtering cylinder is still clean.\n"; } 1; }
To install Acme::FishFarm, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Acme::FishFarm
CPAN shell
perl -MCPAN -e shell install Acme::FishFarm
For more information on module installation, please visit the detailed CPAN module installation guide.