See require for more info, but basically:

if( $someTest ){
   my $class = 'Class::DBI';
   eval "require $class";
   die "Could not load '$class': $@" if $@;
}
[download]