print "\nChecking for optional modules\n\n";

unless (check_module('Digest::BubbleBabble', 0.01, \$missing)) { print<<MSG, "\n"; Digest::BubbleBabble is required if you want to generate bubble babble key fingerprints. MSG if (read_yes_or_no("Would you like to install it now? (y/n)", "y")) { require CPAN; CPAN::Shell->install('Digest::BubbleBabble'); chdir $cwd or die "Can't chdir back to $cwd: $!"; } print "\n"; }