my $modul = 1;
eval "use MODUL::NAME; 1;" or $modul = 0;
if ($modul) { Modul vorhanden }