Help for this page

Select Code to Download


  1. or download this
      use Test::More tests => 23;
  use Test::Differences;
  use Test::Exception;
  2. or download this
      package My::Tests;

  use Test::Custom qw(
...
  );

  1;
  3. or download this
      package My::Tests;

  use Test::Custom qw(
...
  Test::Custom->add('Test::NoWarnings') if $some_condition;

  1;
  4. or download this
      eval <<"END";
  package $calling_package;

...
  END
  
  if ( my $error = $@ ) { ... }