diff options
| author | Murilo Ijanc <[email protected]> | 2026-07-26 14:40:05 -0300 |
|---|---|---|
| committer | Murilo Ijanc <[email protected]> | 2026-07-26 14:40:05 -0300 |
| commit | 0bc578d6d334c7f1ccaf329cd61bb8bce76b7f59 (patch) | |
| tree | 86f73108f0432fd8330edcaab8b8ae7018322dee /t/00-load.t | |
| download | perl-6661cb35162c38099b86f248b938f5e4d4d11515.tar.gz | |
Initial importv0.1.0
Diffstat (limited to 't/00-load.t')
| -rw-r--r-- | t/00-load.t | 42 |
1 files changed, 42 insertions, 0 deletions
diff --git a/t/00-load.t b/t/00-load.t new file mode 100644 index 0000000..73c8063 --- /dev/null +++ b/t/00-load.t @@ -0,0 +1,42 @@ +use strict; +use warnings; + +use Test::More; + +my @modules = qw( + Cepis + Cepis::Address + Cepis::CSV + Cepis::Client + Cepis::Error + Cepis::Geo + Cepis::Health +); + +use_ok($_) for @modules; + +is( $Cepis::VERSION, '0.1.0', 'Cepis is at version 0.1.0' ); + +for my $module (@modules) { + no strict 'refs'; + is( ${"${module}::VERSION"}, $Cepis::VERSION, "$module carries the same version" ); +} + +for my $class ( + qw( + Cepis::Error::InvalidCEP + Cepis::Error::CEPNotFound + Cepis::Error::Network + Cepis::Error::ServerError + Cepis::Error::RateLimited + Cepis::Error::InvalidResponse + ) + ) +{ + ok( $class->isa('Cepis::Error'), "$class is a Cepis::Error" ); +} + +can_ok( 'Cepis', qw(lookup lookup_many health normalize_cep default_client) ); +can_ok( 'Cepis::Client', qw(new lookup lookup_many health) ); + +done_testing(); |