[OpenSIPS-Devel] [opensips] Perl module - "use UNIVERSAL" is a fatal error starting with Pert 5.22 (#804)

[Peter Lemenkov]

At least two places in OpenSIPS where "use UNIVERSAL" is used:

./opensips-1.10.3-tls/modules/perl/lib/perl/OpenSIPS/LDAPUtils/LDAPConnection.pm
55:use UNIVERSAL qw( isa );
188:    if( isa($conf ,"OpenSIPS::LDAPUtils::LDAPConnection") ) {

./opensips-1.10.3-tls/modules/perl/lib/perl/OpenSIPS/VDB.pm
48:use UNIVERSAL qw ( can );
90:		if (can($pkg, $3)) {
92:		} elsif (can($v, "init")) {
95:		} elsif (can($v, "new")) {

This should be fixed as according to this document it will throw a fatal error starting with Perl 5.22:

http://search.cpan.org/~shay/perl-5.21.11/pod/perl5213delta.pod#use%C2%A0UNIVERSAL%C2%A0%27...%27_is_now_a_fatal_error

---
Reply to this email directly or view it on GitHub:
https://github.com/OpenSIPS/opensips/issues/804
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.opensips.org/pipermail/devel/attachments/20160220/0f2b8646/attachment.htm>