summaryrefslogtreecommitdiffstats
path: root/t/00-load.t
diff options
context:
space:
mode:
authorMurilo Ijanc <[email protected]>2026-07-26 14:40:05 -0300
committerMurilo Ijanc <[email protected]>2026-07-26 14:40:05 -0300
commit0bc578d6d334c7f1ccaf329cd61bb8bce76b7f59 (patch)
tree86f73108f0432fd8330edcaab8b8ae7018322dee /t/00-load.t
downloadperl-6661cb35162c38099b86f248b938f5e4d4d11515.tar.gz
Initial importv0.1.0
Diffstat (limited to 't/00-load.t')
-rw-r--r--t/00-load.t42
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();