TT#19710 Use strict and warnings everywhere

Except when Sipwise::Base is used which implies these.

Change-Id: I8a31cfd4b73513509587f31d81b2e53868972b1b
changes/28/16628/5
Guillem Jover 8 years ago
parent e099b045cd
commit 8a19769ca7

@ -1,5 +1,8 @@
#!/usr/bin/perl
use strict;
use warnings;
use Module::Build qw();
my $builder = Module::Build->new(

@ -1,4 +1,5 @@
#!/usr/bin/perl
use Sipwise::Base;
use DBIx::Class::Schema::Loader qw(make_schema_at);
use File::Path qw(make_path);

@ -1,7 +1,7 @@
package NGCP::InterceptSchema;
use warnings;
use strict;
use warnings;
use parent 'NGCP::Schema';

@ -1,4 +1,5 @@
package NGCP::Schema::InflateColumn::DateTime::EpochMicro;
use Sipwise::Base '-skip'=>['TryCatch'];
use DateTime qw();

@ -1,4 +1,5 @@
package NGCP::Schema::InflateColumn::DateTime::EpochMilli;
use Sipwise::Base '-skip'=>['TryCatch'];
use DateTime qw();

@ -1,4 +1,5 @@
package NGCP::Schema::InflateColumn::DateTime::EpochString;
use Sipwise::Base '-skip'=>['TryCatch'];
use DateTime qw();

@ -1,4 +1,8 @@
package NGCP::Schema::Result::acc;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::acc_backup;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::acc_trash;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::active_watchers;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::address;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::admins;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::aliases;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::autoprov_configs;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::autoprov_device_extensions;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::autoprov_device_line_annotations;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::autoprov_device_line_ranges;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::autoprov_devices;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::autoprov_field_device_lines;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::autoprov_field_devices;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::autoprov_firmwares;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::autoprov_firmwares_data;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::autoprov_profiles;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::autoprov_redirect_credentials;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::autoprov_sync;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::autoprov_sync_parameters;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::billing_fees;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::billing_fees_history;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::billing_fees_raw;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::billing_mappings;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::billing_mappings_actual;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent qw/DBIx::Class::Core/;

@ -1,4 +1,8 @@
package NGCP::Schema::Result::billing_network_blocks;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use Math::BigInt;
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::billing_networks;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::billing_peaktime_special;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::billing_peaktime_weekdays;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::billing_profiles;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::billing_zones;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::billing_zones_history;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::call_list_suppressions;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::carrier_contracts;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::carrier_customers;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::carrier_orders;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::carrier_payments;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::cdr;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::cfg_schema;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::contacts;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::contract_balances;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::contract_credits;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::contract_fraud_events;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent qw/DBIx::Class::Core/;

@ -1,4 +1,8 @@
package NGCP::Schema::Result::contract_fraud_preferences;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::contract_registers;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::contract_timezone;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent qw/DBIx::Class::Core/;

@ -1,4 +1,8 @@
package NGCP::Schema::Result::contracts;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::credit_payments;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::credits;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::customer_registers;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::customers;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::db_schema;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::dbaliases;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::dialog;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::dialog_vars;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::dialplan;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::dispatcher;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::dom_preferences;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::domain;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::domain_attrs;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::domain_resellers;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::domains;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::email_templates;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::emergency_containers;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::emergency_mappings;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,5 +1,8 @@
package NGCP::Schema::Result::events;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,5 +1,8 @@
package NGCP::Schema::Result::events_relation;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,5 +1,8 @@
package NGCP::Schema::Result::events_relation_data;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,5 +1,8 @@
package NGCP::Schema::Result::events_tag;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,5 +1,8 @@
package NGCP::Schema::Result::events_tag_data;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::fax_destinations;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::fax_journal;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::fax_preferences;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::htable;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::interceptions;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::invoice_templates;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::invoices;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::journals;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::kamailio_acc;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::kamailio_acc_backup;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::kamailio_acc_trash;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::language_strings;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::lcr_gw;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::lcr_rule;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::lcr_rule_target;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::lnp_numbers;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::lnp_numbers_actual;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent qw/DBIx::Class::Core/;

@ -1,4 +1,8 @@
package NGCP::Schema::Result::lnp_providers;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::location;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::location_attrs;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::malicious_calls;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::mark;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::message_packets;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

@ -1,4 +1,8 @@
package NGCP::Schema::Result::messages;
use strict;
use warnings;
use Scalar::Util qw(blessed);
use parent 'DBIx::Class::Core';

Some files were not shown because too many files have changed in this diff Show More

Loading…
Cancel
Save