Help for this page

Select Code to Download


  1. or download this
    ( my $file= $class ) =~ s-::|'-/-g;
if(  ! eval { require "$file.pm"; 1 }  ) {
    # work-around the failure here
}
  2. or download this
    if(  ! eval "require $class; 1"  ) {
    # work-around the failure here
}
  3. or download this
    eval "require $class; 1"
    or  die $@;
  4. or download this
    ( my $file= $class ) =~ s-::|'-/-g;
require "$file.pm";