diff --git a/lib/NGCP/InterceptSchema.pm b/lib/NGCP/InterceptSchema.pm index e11a2a7a..e760eb46 100644 --- a/lib/NGCP/InterceptSchema.pm +++ b/lib/NGCP/InterceptSchema.pm @@ -3,7 +3,7 @@ package NGCP::InterceptSchema; use warnings; use strict; -use base 'NGCP::Schema'; +use parent 'NGCP::Schema'; our $VERSION = '2.007'; diff --git a/lib/NGCP/Schema.pm b/lib/NGCP/Schema.pm index 73dc2175..33047ea1 100644 --- a/lib/NGCP/Schema.pm +++ b/lib/NGCP/Schema.pm @@ -4,7 +4,7 @@ use Sipwise::Base '-skip'=>['TryCatch']; use NGCP::Schema::Config qw(); use Regexp::Common qw(net); use Regexp::IPv6 qw($IPv6_re); -use base 'DBIx::Class::Schema'; +use parent 'DBIx::Class::Schema'; our $VERSION = '2.007'; diff --git a/lib/NGCP/Schema/InflateColumn/DateTime/EpochMicro.pm b/lib/NGCP/Schema/InflateColumn/DateTime/EpochMicro.pm index 6433b7d7..daf2d65e 100644 --- a/lib/NGCP/Schema/InflateColumn/DateTime/EpochMicro.pm +++ b/lib/NGCP/Schema/InflateColumn/DateTime/EpochMicro.pm @@ -2,7 +2,7 @@ package NGCP::Schema::InflateColumn::DateTime::EpochMicro; use Sipwise::Base '-skip'=>['TryCatch']; use DateTime qw(); -use base 'DBIx::Class'; +use parent 'DBIx::Class'; our $VERSION = '2.007'; diff --git a/lib/NGCP/Schema/InflateColumn/DateTime/EpochMilli.pm b/lib/NGCP/Schema/InflateColumn/DateTime/EpochMilli.pm index 4a6169f8..1724e229 100644 --- a/lib/NGCP/Schema/InflateColumn/DateTime/EpochMilli.pm +++ b/lib/NGCP/Schema/InflateColumn/DateTime/EpochMilli.pm @@ -2,7 +2,7 @@ package NGCP::Schema::InflateColumn::DateTime::EpochMilli; use Sipwise::Base '-skip'=>['TryCatch']; use DateTime qw(); -use base 'DBIx::Class'; +use parent 'DBIx::Class'; our $VERSION = '2.007'; diff --git a/lib/NGCP/Schema/InflateColumn/DateTime/EpochString.pm b/lib/NGCP/Schema/InflateColumn/DateTime/EpochString.pm index bf022150..841327b3 100644 --- a/lib/NGCP/Schema/InflateColumn/DateTime/EpochString.pm +++ b/lib/NGCP/Schema/InflateColumn/DateTime/EpochString.pm @@ -2,7 +2,7 @@ package NGCP::Schema::InflateColumn::DateTime::EpochString; use Sipwise::Base '-skip'=>['TryCatch']; use DateTime qw(); -use base 'DBIx::Class'; +use parent 'DBIx::Class'; our $VERSION = '2.007'; diff --git a/lib/NGCP/Schema/Result/billing_mappings_actual.pm b/lib/NGCP/Schema/Result/billing_mappings_actual.pm index 17f4a350..73a80d0a 100644 --- a/lib/NGCP/Schema/Result/billing_mappings_actual.pm +++ b/lib/NGCP/Schema/Result/billing_mappings_actual.pm @@ -1,6 +1,6 @@ package NGCP::Schema::Result::billing_mappings_actual; use Scalar::Util qw(blessed); -use base qw/DBIx::Class::Core/; +use parent qw/DBIx::Class::Core/; our $VERSION = '2.007'; diff --git a/lib/NGCP/Schema/Result/contract_fraud_events.pm b/lib/NGCP/Schema/Result/contract_fraud_events.pm index 1324c40f..733ad3f5 100644 --- a/lib/NGCP/Schema/Result/contract_fraud_events.pm +++ b/lib/NGCP/Schema/Result/contract_fraud_events.pm @@ -1,6 +1,6 @@ package NGCP::Schema::Result::contract_fraud_events; use Scalar::Util qw(blessed); -use base qw/DBIx::Class::Core/; +use parent qw/DBIx::Class::Core/; our $VERSION = '2.007'; diff --git a/lib/NGCP/Schema/Result/contract_timezone.pm b/lib/NGCP/Schema/Result/contract_timezone.pm index 8403e2c4..37a0d52a 100644 --- a/lib/NGCP/Schema/Result/contract_timezone.pm +++ b/lib/NGCP/Schema/Result/contract_timezone.pm @@ -1,6 +1,6 @@ package NGCP::Schema::Result::contract_timezone; use Scalar::Util qw(blessed); -use base qw/DBIx::Class::Core/; +use parent qw/DBIx::Class::Core/; our $VERSION = '2.007'; diff --git a/lib/NGCP/Schema/Result/lnp_numbers_actual.pm b/lib/NGCP/Schema/Result/lnp_numbers_actual.pm index 3b989ff5..a4ec4161 100644 --- a/lib/NGCP/Schema/Result/lnp_numbers_actual.pm +++ b/lib/NGCP/Schema/Result/lnp_numbers_actual.pm @@ -1,6 +1,6 @@ package NGCP::Schema::Result::lnp_numbers_actual; use Scalar::Util qw(blessed); -use base qw/DBIx::Class::Core/; +use parent qw/DBIx::Class::Core/; our $VERSION = '2.007'; diff --git a/lib/NGCP/Schema/Result/messages_custom.pm b/lib/NGCP/Schema/Result/messages_custom.pm index 63d45e0c..d28dfb08 100644 --- a/lib/NGCP/Schema/Result/messages_custom.pm +++ b/lib/NGCP/Schema/Result/messages_custom.pm @@ -1,6 +1,6 @@ package NGCP::Schema::Result::messages_custom; use Scalar::Util qw(blessed); -use base qw/DBIx::Class::Core/; +use parent qw/DBIx::Class::Core/; our $VERSION = '2.007'; diff --git a/lib/NGCP/Schema/Result/reseller_timezone.pm b/lib/NGCP/Schema/Result/reseller_timezone.pm index c5f34539..efec1b16 100644 --- a/lib/NGCP/Schema/Result/reseller_timezone.pm +++ b/lib/NGCP/Schema/Result/reseller_timezone.pm @@ -1,6 +1,6 @@ package NGCP::Schema::Result::reseller_timezone; use Scalar::Util qw(blessed); -use base qw/DBIx::Class::Core/; +use parent qw/DBIx::Class::Core/; our $VERSION = '2.007'; diff --git a/lib/NGCP/Schema/Result/timezones.pm b/lib/NGCP/Schema/Result/timezones.pm index 7fa32d9f..4bff9134 100644 --- a/lib/NGCP/Schema/Result/timezones.pm +++ b/lib/NGCP/Schema/Result/timezones.pm @@ -1,6 +1,6 @@ package NGCP::Schema::Result::timezones; use Scalar::Util qw(blessed); -use base qw/DBIx::Class::Core/; +use parent qw/DBIx::Class::Core/; our $VERSION = '2.007'; diff --git a/lib/NGCP/Schema/Result/voip_subscriber_timezone.pm b/lib/NGCP/Schema/Result/voip_subscriber_timezone.pm index 02f21c84..80d2da17 100644 --- a/lib/NGCP/Schema/Result/voip_subscriber_timezone.pm +++ b/lib/NGCP/Schema/Result/voip_subscriber_timezone.pm @@ -1,6 +1,6 @@ package NGCP::Schema::Result::voip_subscriber_timezone; use Scalar::Util qw(blessed); -use base qw/DBIx::Class::Core/; +use parent qw/DBIx::Class::Core/; our $VERSION = '2.007'; diff --git a/lib/NGCP/Schema/ResultSet.pm b/lib/NGCP/Schema/ResultSet.pm index f980d67e..6eb4b5ad 100644 --- a/lib/NGCP/Schema/ResultSet.pm +++ b/lib/NGCP/Schema/ResultSet.pm @@ -1,6 +1,6 @@ package NGCP::Schema::ResultSet; use Sipwise::Base '-skip'=>['TryCatch']; -use base 'DBIx::Class::ResultSet'; +use parent 'DBIx::Class::ResultSet'; our $VERSION = '2.007'; diff --git a/lib/NGCP/Schema/Storage/DateTime/Format/MySQL.pm b/lib/NGCP/Schema/Storage/DateTime/Format/MySQL.pm index 2d5a318a..96b8192b 100644 --- a/lib/NGCP/Schema/Storage/DateTime/Format/MySQL.pm +++ b/lib/NGCP/Schema/Storage/DateTime/Format/MySQL.pm @@ -5,7 +5,7 @@ use warnings; our $VERSION = '0.06'; -use base ("DateTime::Format::MySQL"); +use parent 'DateTime::Format::MySQL'; sub format_time {