MT#6559 remove usage of CLASS

so in a future step we can remove this from
Sipwise::Base

bin/ngcp-dump-schema

@@ -76,7 +76,7 @@ for my $db (qw(accounting billing carrier kamailio ngcp provisioning sipstats))
             moniker_map => sub { $_[0] },
             col_accessor_map => sub {
                 my ($column) = @_;
-                return $CLASS->can($column) ? "column_$column" : $column;
+                return __PACKAGE__->can($column) ? "column_$column" : $column;
             },
             components => [qw(InflateColumn::DateTime Helper::Row::ToJSON)],
             quiet => 1,

lib/NGCP/Schema.pm

@@ -81,7 +81,7 @@ method _check_ip_generic($ip, $flags) {
     return;
 }
 
-$CLASS->meta->make_immutable;
+__PACKAGE__->meta->make_immutable;
 
 __END__
 

lib/NGCP/Schema/Config.pm

@@ -41,7 +41,7 @@ method check_config($config) {
     return $config;
 }
 
-$CLASS->meta->make_immutable;
+__PACKAGE__->meta->make_immutable;
 
 __END__
 

lib/NGCP/Schema/Exception.pm

@@ -8,7 +8,7 @@ extends 'Throwable::Error';
 has('description', is => 'ro', isa => 'Str', required => 1);
 has('context', is => 'ro', isa => 'HashRef', documentation => 'extra data to pass along');
 
-$CLASS->meta->make_immutable(inline_constructor => 0);
+__PACKAGE__->meta->make_immutable(inline_constructor => 0);
 
 __END__