#! perl
use strict;
use warnings;
use Module::Load::Conditional qw( check_install );

my $something = "This is really something!\n";
my $superduper;
BEGIN { $superduper = check_install(module => 'SuperDuperPrinter'); }

if ($superduper)
{
    use if $superduper, SuperDuperPrinter => qw( Print );

    SuperDuperPrinter::Print($something); 
} 
else
{
    print $something; 
} 

##</code><code>##

my $superduper = check_install(module => 'SuperDuperPrinter');

##</code><code>##

my $superduper;
BEGIN { $superduper = check_install(module => 'SuperDuperPrinter'); }