File: 01.export.t

package info (click to toggle)
libfcgi-ev-perl 2.0.1-2
  • links: PTS, VCS
  • area: main
  • in suites: bookworm, forky, sid, trixie
  • size: 124 kB
  • sloc: perl: 216; makefile: 2
file content (25 lines) | stat: -rw-r--r-- 473 bytes parent folder | download | duplicates (2) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
 
use warnings;
use strict;
use Test::More;

#use Your::Module;

my @exports
#    = qw( func1 func2 )
    ;
my @not_exports
#    = qw( func3 func4 )
    ;

plan +(@exports + @not_exports)
    ? ( tests       => @exports + @not_exports                  )
    : ( skip_all    => q{This module doesn't export anything}   )
    ;

for my $export (@exports) {
    can_ok( __PACKAGE__, $export );
}

for my $not_export (@not_exports) {
    ok( ! __PACKAGE__->can($not_export) );
}