Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

Log::Contextual

  • Loading branch information...
commit 49583b3a469ffd0eebcb34416728da86b07f54f0 1 parent 0fe1f61
ematiu authored
View
0  .gitignore 100644 → 100755
File mode changed
View
0  Changes 100644 → 100755
File mode changed
View
0  INSTALL 100644 → 100755
File mode changed
View
0  MANIFEST 100644 → 100755
File mode changed
View
160 Makefile
@@ -1,7 +1,7 @@
# This Makefile is for the SQL::Bibliosoph extension to perl.
#
# It was generated automatically by MakeMaker version
-# 6.62 (Revision: 66200) from the contents of
+# 6.66 (Revision: 66600) from the contents of
# Makefile.PL. Don't edit this file, edit Makefile.PL instead.
#
# ANY CHANGES MADE HERE WILL BE LOST!
@@ -17,7 +17,8 @@
# CONFIGURE_REQUIRES => { }
# MIN_PERL_VERSION => q[5.010000]
# NAME => q[SQL::Bibliosoph]
-# PREREQ_PM => { DBD::Mock=>q[1.43], Package::Constants=>q[0.02], Tie::Hash::Random=>q[1], Storable=>q[2.3], Time::HiRes=>q[1.97], Carp=>q[1.25], Exception::Class=>q[1.3], Test::More=>q[0.88], DBD::mysql=>q[4.004], Digest::MD5=>q[2.39], Cache::Memcached::Fast=>q[0.17], Moose=>q[0.82], Tie::Array::Random=>q[1], DBI=>q[1.5] }
+# PREREQ_PM => { DBD::Mock=>q[1.43], Package::Constants=>q[0.02], Tie::Hash::Random=>q[1], Storable=>q[2.3], Time::HiRes=>q[1.97], Carp=>q[1.25], Exception::Class=>q[1.3], Test::More=>q[0.88], Log::Contextual=>q[0.005003], DBD::mysql=>q[4.004], Digest::MD5=>q[2.39], Cache::Memcached::Fast=>q[0.17], Moose=>q[0.82], Tie::Array::Random=>q[1], DBI=>q[1.5] }
+# TEST_REQUIRES => { }
# VERSION_FROM => q[lib/SQL/Bibliosoph.pm]
# --- MakeMaker post_initialize section:
@@ -25,30 +26,30 @@
# --- MakeMaker const_config section:
-# These definitions are from config.sh (via /opt/local/lib/perl5/5.10.1/darwin-thread-multi-2level/Config.pm).
+# These definitions are from config.sh (via /System/Library/Perl/5.12/darwin-thread-multi-2level/Config.pm).
# They may have been overridden via Makefile.PL or on the command line.
AR = ar
-CC = /usr/bin/clang
+CC = clang
CCCDLFLAGS =
CCDLFLAGS =
DLEXT = bundle
DLSRC = dl_dlopen.xs
EXE_EXT =
FULL_AR = /usr/bin/ar
-LD = env MACOSX_DEPLOYMENT_TARGET=10.3 /usr/bin/clang
-LDDLFLAGS = -L/opt/local/lib -bundle -undefined dynamic_lookup -fstack-protector
-LDFLAGS = -L/opt/local/lib -fstack-protector
+LD = clang -mmacosx-version-min=10.8
+LDDLFLAGS = -arch i386 -arch x86_64 -bundle -undefined dynamic_lookup -L/usr/local/lib -fstack-protector
+LDFLAGS = -arch i386 -arch x86_64 -fstack-protector -L/usr/local/lib
LIBC =
LIB_EXT = .a
OBJ_EXT = .o
OSNAME = darwin
-OSVERS = 11.3.0
-RANLIB = ranlib
-SITELIBEXP = /opt/local/lib/perl5/site_perl/5.10.1
-SITEARCHEXP = /opt/local/lib/perl5/site_perl/5.10.1/darwin-thread-multi-2level
+OSVERS = 12.0
+RANLIB = /usr/bin/ar s
+SITELIBEXP = /Library/Perl/5.12
+SITEARCHEXP = /Library/Perl/5.12/darwin-thread-multi-2level
SO = dylib
-VENDORARCHEXP = /opt/local/lib/perl5/vendor_perl/5.10.1/darwin-thread-multi-2level
-VENDORLIBEXP = /opt/local/lib/perl5/vendor_perl/5.10.1
+VENDORARCHEXP = /Network/Library/Perl/5.12/darwin-thread-multi-2level
+VENDORLIBEXP = /Network/Library/Perl/5.12
# --- MakeMaker constants section:
@@ -57,11 +58,11 @@ DIRFILESEP = /
DFSEP = $(DIRFILESEP)
NAME = SQL::Bibliosoph
NAME_SYM = SQL_Bibliosoph
-VERSION = 2.52
+VERSION = 2.53
VERSION_MACRO = VERSION
-VERSION_SYM = 2_52
+VERSION_SYM = 2_53
DEFINE_VERSION = -D$(VERSION_MACRO)=\"$(VERSION)\"
-XS_VERSION = 2.52
+XS_VERSION = 2.53
XS_VERSION_MACRO = XS_VERSION
XS_DEFINE_VERSION = -D$(XS_VERSION_MACRO)=\"$(XS_VERSION)\"
INST_ARCHLIB = blib/arch
@@ -70,60 +71,60 @@ INST_BIN = blib/bin
INST_LIB = blib/lib
INST_MAN1DIR = blib/man1
INST_MAN3DIR = blib/man3
-MAN1EXT = 1pm
+MAN1EXT = 1
MAN3EXT = 3pm
INSTALLDIRS = site
DESTDIR =
PREFIX = $(SITEPREFIX)
-PERLPREFIX = /opt/local
-SITEPREFIX = /opt/local
-VENDORPREFIX = /opt/local
-INSTALLPRIVLIB = /opt/local/lib/perl5/5.10.1
+PERLPREFIX = /
+SITEPREFIX = /usr/local
+VENDORPREFIX = /usr/local
+INSTALLPRIVLIB = /Library/Perl/Updates/5.12.4
DESTINSTALLPRIVLIB = $(DESTDIR)$(INSTALLPRIVLIB)
-INSTALLSITELIB = /opt/local/lib/perl5/site_perl/5.10.1
+INSTALLSITELIB = /Library/Perl/5.12
DESTINSTALLSITELIB = $(DESTDIR)$(INSTALLSITELIB)
-INSTALLVENDORLIB = /opt/local/lib/perl5/vendor_perl/5.10.1
+INSTALLVENDORLIB = /Network/Library/Perl/5.12
DESTINSTALLVENDORLIB = $(DESTDIR)$(INSTALLVENDORLIB)
-INSTALLARCHLIB = /opt/local/lib/perl5/5.10.1/darwin-thread-multi-2level
+INSTALLARCHLIB = /Library/Perl/Updates/5.12.4/darwin-thread-multi-2level
DESTINSTALLARCHLIB = $(DESTDIR)$(INSTALLARCHLIB)
-INSTALLSITEARCH = /opt/local/lib/perl5/site_perl/5.10.1/darwin-thread-multi-2level
+INSTALLSITEARCH = /Library/Perl/5.12/darwin-thread-multi-2level
DESTINSTALLSITEARCH = $(DESTDIR)$(INSTALLSITEARCH)
-INSTALLVENDORARCH = /opt/local/lib/perl5/vendor_perl/5.10.1/darwin-thread-multi-2level
+INSTALLVENDORARCH = /Network/Library/Perl/5.12/darwin-thread-multi-2level
DESTINSTALLVENDORARCH = $(DESTDIR)$(INSTALLVENDORARCH)
-INSTALLBIN = /opt/local/bin
+INSTALLBIN = /usr/bin
DESTINSTALLBIN = $(DESTDIR)$(INSTALLBIN)
-INSTALLSITEBIN = /opt/local/bin
+INSTALLSITEBIN = /usr/local/bin
DESTINSTALLSITEBIN = $(DESTDIR)$(INSTALLSITEBIN)
-INSTALLVENDORBIN = /opt/local/bin
+INSTALLVENDORBIN = /usr/local/bin
DESTINSTALLVENDORBIN = $(DESTDIR)$(INSTALLVENDORBIN)
-INSTALLSCRIPT = /opt/local/bin
+INSTALLSCRIPT = /usr/bin
DESTINSTALLSCRIPT = $(DESTDIR)$(INSTALLSCRIPT)
-INSTALLSITESCRIPT = /opt/local/bin
+INSTALLSITESCRIPT = /usr/local/bin
DESTINSTALLSITESCRIPT = $(DESTDIR)$(INSTALLSITESCRIPT)
-INSTALLVENDORSCRIPT = /opt/local/bin
+INSTALLVENDORSCRIPT = /usr/local/bin
DESTINSTALLVENDORSCRIPT = $(DESTDIR)$(INSTALLVENDORSCRIPT)
-INSTALLMAN1DIR = /opt/local/share/man/man1p
+INSTALLMAN1DIR = /usr/share/man/man1
DESTINSTALLMAN1DIR = $(DESTDIR)$(INSTALLMAN1DIR)
-INSTALLSITEMAN1DIR = /opt/local/share/man/man1
+INSTALLSITEMAN1DIR = /usr/local/share/man/man1
DESTINSTALLSITEMAN1DIR = $(DESTDIR)$(INSTALLSITEMAN1DIR)
-INSTALLVENDORMAN1DIR = /opt/local/share/man/man1
+INSTALLVENDORMAN1DIR = /usr/local/share/man/man1
DESTINSTALLVENDORMAN1DIR = $(DESTDIR)$(INSTALLVENDORMAN1DIR)
-INSTALLMAN3DIR = /opt/local/share/man/man3p
+INSTALLMAN3DIR = /usr/share/man/man3
DESTINSTALLMAN3DIR = $(DESTDIR)$(INSTALLMAN3DIR)
-INSTALLSITEMAN3DIR = /opt/local/share/man/man3
+INSTALLSITEMAN3DIR = /usr/local/share/man/man3
DESTINSTALLSITEMAN3DIR = $(DESTDIR)$(INSTALLSITEMAN3DIR)
-INSTALLVENDORMAN3DIR = /opt/local/share/man/man3
+INSTALLVENDORMAN3DIR = /usr/local/share/man/man3
DESTINSTALLVENDORMAN3DIR = $(DESTDIR)$(INSTALLVENDORMAN3DIR)
-PERL_LIB = /opt/local/lib/perl5/5.10.1
-PERL_ARCHLIB = /opt/local/lib/perl5/5.10.1/darwin-thread-multi-2level
+PERL_LIB = /System/Library/Perl/5.12
+PERL_ARCHLIB = /System/Library/Perl/5.12/darwin-thread-multi-2level
LIBPERL_A = libperl.a
FIRST_MAKEFILE = Makefile
MAKEFILE_OLD = Makefile.old
MAKE_APERL_FILE = Makefile.aperl
PERLMAINCC = $(CC)
-PERL_INC = /opt/local/lib/perl5/5.10.1/darwin-thread-multi-2level/CORE
-PERL = /opt/local/bin/perl
-FULLPERL = /opt/local/bin/perl
+PERL_INC = /System/Library/Perl/5.12/darwin-thread-multi-2level/CORE
+PERL = /usr/bin/perl
+FULLPERL = /usr/bin/perl
ABSPERL = $(PERL)
PERLRUN = $(PERL)
FULLPERLRUN = $(FULLPERL)
@@ -136,9 +137,9 @@ PERM_DIR = 755
PERM_RW = 644
PERM_RWX = 755
-MAKEMAKER = /opt/local/lib/perl5/5.10.1/ExtUtils/MakeMaker.pm
-MM_VERSION = 6.62
-MM_REVISION = 66200
+MAKEMAKER = /Library/Perl/Updates/5.12.4/ExtUtils/MakeMaker.pm
+MM_VERSION = 6.66
+MM_REVISION = 66600
# FULLEXT = Pathname for extension directory (eg Foo/Bar/Oracle).
# BASEEXT = Basename part of FULLEXT. May be just equal FULLEXT. (eg Oracle)
@@ -187,34 +188,43 @@ PERL_ARCHIVE_AFTER =
TO_INST_PM = lib/SQL/Bibliosoph.pm \
+ lib/SQL/Bibliosoph/.CatalogFile.pm.swo \
+ lib/SQL/Bibliosoph/.Exceptions.pm.swo \
+ lib/SQL/Bibliosoph/.Query.pm.swo \
lib/SQL/Bibliosoph/CatalogFile.pm \
lib/SQL/Bibliosoph/Dummy.pm \
lib/SQL/Bibliosoph/Exceptions.pm \
lib/SQL/Bibliosoph/Query.pm \
lib/SQL/Bibliosoph/Sims.pm
-PM_TO_BLIB = lib/SQL/Bibliosoph/Exceptions.pm \
+PM_TO_BLIB = lib/SQL/Bibliosoph/Query.pm \
+ blib/lib/SQL/Bibliosoph/Query.pm \
+ lib/SQL/Bibliosoph/.Exceptions.pm.swo \
+ blib/lib/SQL/Bibliosoph/.Exceptions.pm.swo \
+ lib/SQL/Bibliosoph/Exceptions.pm \
blib/lib/SQL/Bibliosoph/Exceptions.pm \
lib/SQL/Bibliosoph/Dummy.pm \
blib/lib/SQL/Bibliosoph/Dummy.pm \
- lib/SQL/Bibliosoph/Query.pm \
- blib/lib/SQL/Bibliosoph/Query.pm \
+ lib/SQL/Bibliosoph/.Query.pm.swo \
+ blib/lib/SQL/Bibliosoph/.Query.pm.swo \
+ lib/SQL/Bibliosoph/.CatalogFile.pm.swo \
+ blib/lib/SQL/Bibliosoph/.CatalogFile.pm.swo \
lib/SQL/Bibliosoph.pm \
blib/lib/SQL/Bibliosoph.pm \
- lib/SQL/Bibliosoph/Sims.pm \
- blib/lib/SQL/Bibliosoph/Sims.pm \
lib/SQL/Bibliosoph/CatalogFile.pm \
- blib/lib/SQL/Bibliosoph/CatalogFile.pm
+ blib/lib/SQL/Bibliosoph/CatalogFile.pm \
+ lib/SQL/Bibliosoph/Sims.pm \
+ blib/lib/SQL/Bibliosoph/Sims.pm
# --- MakeMaker platform_constants section:
-MM_Unix_VERSION = 6.62
+MM_Unix_VERSION = 6.66
PERL_MALLOC_DEF = -DPERL_EXTMALLOC_DEF -Dmalloc=Perl_malloc -Dfree=Perl_mfree -Drealloc=Perl_realloc -Dcalloc=Perl_calloc
# --- MakeMaker tool_autosplit section:
# Usage: $(AUTOSPLITFILE) FileToSplit AutoDirToSplitInto
-AUTOSPLITFILE = $(ABSPERLRUN) -e 'use AutoSplit; autosplit($$ARGV[0], $$ARGV[1], 0, 1, 1)' --
+AUTOSPLITFILE = $(ABSPERLRUN) -e 'use AutoSplit; autosplit($$$$ARGV[0], $$$$ARGV[1], 0, 1, 1)' --
@@ -273,7 +283,7 @@ RCS_LABEL = rcs -Nv$(VERSION_SYM): -q
DIST_CP = best
DIST_DEFAULT = tardist
DISTNAME = SQL-Bibliosoph
-DISTVNAME = SQL-Bibliosoph-2.52
+DISTVNAME = SQL-Bibliosoph-2.53
# --- MakeMaker macro section:
@@ -428,13 +438,13 @@ POD2MAN = $(POD2MAN_EXE)
manifypods : pure_all \
lib/SQL/Bibliosoph/Query.pm \
lib/SQL/Bibliosoph.pm \
- lib/SQL/Bibliosoph/Sims.pm \
- lib/SQL/Bibliosoph/CatalogFile.pm
+ lib/SQL/Bibliosoph/CatalogFile.pm \
+ lib/SQL/Bibliosoph/Sims.pm
$(NOECHO) $(POD2MAN) --section=3 --perm_rw=$(PERM_RW) \
lib/SQL/Bibliosoph/Query.pm $(INST_MAN3DIR)/SQL::Bibliosoph::Query.$(MAN3EXT) \
lib/SQL/Bibliosoph.pm $(INST_MAN3DIR)/SQL::Bibliosoph.$(MAN3EXT) \
- lib/SQL/Bibliosoph/Sims.pm $(INST_MAN3DIR)/SQL::Bibliosoph::Sims.$(MAN3EXT) \
- lib/SQL/Bibliosoph/CatalogFile.pm $(INST_MAN3DIR)/SQL::Bibliosoph::CatalogFile.$(MAN3EXT)
+ lib/SQL/Bibliosoph/CatalogFile.pm $(INST_MAN3DIR)/SQL::Bibliosoph::CatalogFile.$(MAN3EXT) \
+ lib/SQL/Bibliosoph/Sims.pm $(INST_MAN3DIR)/SQL::Bibliosoph::Sims.$(MAN3EXT)
@@ -508,7 +518,7 @@ metafile : create_distdir
$(NOECHO) $(ECHO) 'configure_requires:' >> META_new.yml
$(NOECHO) $(ECHO) ' ExtUtils::MakeMaker: 0' >> META_new.yml
$(NOECHO) $(ECHO) 'dynamic_config: 1' >> META_new.yml
- $(NOECHO) $(ECHO) 'generated_by: '\''ExtUtils::MakeMaker version 6.62, CPAN::Meta::Converter version 2.120921'\''' >> META_new.yml
+ $(NOECHO) $(ECHO) 'generated_by: '\''ExtUtils::MakeMaker version 6.66, CPAN::Meta::Converter version 2.130880'\''' >> META_new.yml
$(NOECHO) $(ECHO) 'license: unknown' >> META_new.yml
$(NOECHO) $(ECHO) 'meta-spec:' >> META_new.yml
$(NOECHO) $(ECHO) ' url: http://module-build.sourceforge.net/META-spec-v1.4.html' >> META_new.yml
@@ -526,6 +536,7 @@ metafile : create_distdir
$(NOECHO) $(ECHO) ' DBI: 1.5' >> META_new.yml
$(NOECHO) $(ECHO) ' Digest::MD5: 2.39' >> META_new.yml
$(NOECHO) $(ECHO) ' Exception::Class: 1.3' >> META_new.yml
+ $(NOECHO) $(ECHO) ' Log::Contextual: 0.005003' >> META_new.yml
$(NOECHO) $(ECHO) ' Moose: 0.82' >> META_new.yml
$(NOECHO) $(ECHO) ' Package::Constants: 0.02' >> META_new.yml
$(NOECHO) $(ECHO) ' Storable: 2.3' >> META_new.yml
@@ -534,7 +545,7 @@ metafile : create_distdir
$(NOECHO) $(ECHO) ' Tie::Hash::Random: 1' >> META_new.yml
$(NOECHO) $(ECHO) ' Time::HiRes: 1.97' >> META_new.yml
$(NOECHO) $(ECHO) ' perl: 5.010000' >> META_new.yml
- $(NOECHO) $(ECHO) 'version: 2.52' >> META_new.yml
+ $(NOECHO) $(ECHO) 'version: 2.53' >> META_new.yml
-$(NOECHO) $(MV) META_new.yml $(DISTVNAME)/META.yml
$(NOECHO) $(ECHO) Generating META.json
$(NOECHO) $(ECHO) '{' > META_new.json
@@ -543,7 +554,7 @@ metafile : create_distdir
$(NOECHO) $(ECHO) ' "Matias Alejo Garcia ( matiu@cpan.org ) "' >> META_new.json
$(NOECHO) $(ECHO) ' ],' >> META_new.json
$(NOECHO) $(ECHO) ' "dynamic_config" : 1,' >> META_new.json
- $(NOECHO) $(ECHO) ' "generated_by" : "ExtUtils::MakeMaker version 6.62, CPAN::Meta::Converter version 2.120921",' >> META_new.json
+ $(NOECHO) $(ECHO) ' "generated_by" : "ExtUtils::MakeMaker version 6.66, CPAN::Meta::Converter version 2.130880",' >> META_new.json
$(NOECHO) $(ECHO) ' "license" : [' >> META_new.json
$(NOECHO) $(ECHO) ' "unknown"' >> META_new.json
$(NOECHO) $(ECHO) ' ],' >> META_new.json
@@ -578,6 +589,7 @@ metafile : create_distdir
$(NOECHO) $(ECHO) ' "DBI" : "1.5",' >> META_new.json
$(NOECHO) $(ECHO) ' "Digest::MD5" : "2.39",' >> META_new.json
$(NOECHO) $(ECHO) ' "Exception::Class" : "1.3",' >> META_new.json
+ $(NOECHO) $(ECHO) ' "Log::Contextual" : "0.005003",' >> META_new.json
$(NOECHO) $(ECHO) ' "Moose" : "0.82",' >> META_new.json
$(NOECHO) $(ECHO) ' "Package::Constants" : "0.02",' >> META_new.json
$(NOECHO) $(ECHO) ' "Storable" : "2.3",' >> META_new.json
@@ -590,7 +602,7 @@ metafile : create_distdir
$(NOECHO) $(ECHO) ' }' >> META_new.json
$(NOECHO) $(ECHO) ' },' >> META_new.json
$(NOECHO) $(ECHO) ' "release_status" : "stable",' >> META_new.json
- $(NOECHO) $(ECHO) ' "version" : "2.52"' >> META_new.json
+ $(NOECHO) $(ECHO) ' "version" : "2.53"' >> META_new.json
$(NOECHO) $(ECHO) '}' >> META_new.json
-$(NOECHO) $(MV) META_new.json $(DISTVNAME)/META.json
@@ -686,17 +698,17 @@ ci :
distmeta : create_distdir metafile
$(NOECHO) cd $(DISTVNAME) && $(ABSPERLRUN) -MExtUtils::Manifest=maniadd -e 'exit unless -e q{META.yml};' \
-e 'eval { maniadd({q{META.yml} => q{Module YAML meta-data (added by MakeMaker)}}) }' \
- -e ' or print "Could not add META.yml to MANIFEST: $${'\''@'\''}\n"' --
+ -e ' or print "Could not add META.yml to MANIFEST: $$$${'\''@'\''}\n"' --
$(NOECHO) cd $(DISTVNAME) && $(ABSPERLRUN) -MExtUtils::Manifest=maniadd -e 'exit unless -f q{META.json};' \
-e 'eval { maniadd({q{META.json} => q{Module JSON meta-data (added by MakeMaker)}}) }' \
- -e ' or print "Could not add META.json to MANIFEST: $${'\''@'\''}\n"' --
+ -e ' or print "Could not add META.json to MANIFEST: $$$${'\''@'\''}\n"' --
# --- MakeMaker distsignature section:
distsignature : create_distdir
$(NOECHO) cd $(DISTVNAME) && $(ABSPERLRUN) -MExtUtils::Manifest=maniadd -e 'eval { maniadd({q{SIGNATURE} => q{Public-key signature (added by MakeMaker)}}) } ' \
- -e ' or print "Could not add SIGNATURE to MANIFEST: $${'\''@'\''}\n"' --
+ -e ' or print "Could not add SIGNATURE to MANIFEST: $$$${'\''@'\''}\n"' --
$(NOECHO) cd $(DISTVNAME) && $(TOUCH) SIGNATURE
cd $(DISTVNAME) && cpansign -s
@@ -842,7 +854,7 @@ $(FIRST_MAKEFILE) : Makefile.PL $(CONFIGDEP)
# --- MakeMaker makeaperl section ---
MAP_TARGET = perl
-FULLPERL = /opt/local/bin/perl
+FULLPERL = /usr/bin/perl
$(MAP_TARGET) :: static $(MAKE_APERL_FILE)
$(MAKE) $(USEMAKEFILE) $(MAKE_APERL_FILE) $@
@@ -886,7 +898,7 @@ testdb_static :: testdb_dynamic
# --- MakeMaker ppd section:
# Creates a PPD (Perl Package Description) for a binary distribution.
ppd :
- $(NOECHO) $(ECHO) '<SOFTPKG NAME="$(DISTNAME)" VERSION="2.52">' > $(DISTNAME).ppd
+ $(NOECHO) $(ECHO) '<SOFTPKG NAME="$(DISTNAME)" VERSION="$(VERSION)">' > $(DISTNAME).ppd
$(NOECHO) $(ECHO) ' <ABSTRACT>A SQL Query library</ABSTRACT>' >> $(DISTNAME).ppd
$(NOECHO) $(ECHO) ' <AUTHOR>Matias Alejo Garcia ( matiu@cpan.org ) </AUTHOR>' >> $(DISTNAME).ppd
$(NOECHO) $(ECHO) ' <IMPLEMENTATION>' >> $(DISTNAME).ppd
@@ -898,6 +910,7 @@ ppd :
$(NOECHO) $(ECHO) ' <REQUIRE NAME="DBI::" VERSION="1.5" />' >> $(DISTNAME).ppd
$(NOECHO) $(ECHO) ' <REQUIRE NAME="Digest::MD5" VERSION="2.39" />' >> $(DISTNAME).ppd
$(NOECHO) $(ECHO) ' <REQUIRE NAME="Exception::Class" VERSION="1.3" />' >> $(DISTNAME).ppd
+ $(NOECHO) $(ECHO) ' <REQUIRE NAME="Log::Contextual" VERSION="0.005003" />' >> $(DISTNAME).ppd
$(NOECHO) $(ECHO) ' <REQUIRE NAME="Moose::" VERSION="0.82" />' >> $(DISTNAME).ppd
$(NOECHO) $(ECHO) ' <REQUIRE NAME="Package::Constants" VERSION="0.02" />' >> $(DISTNAME).ppd
$(NOECHO) $(ECHO) ' <REQUIRE NAME="Storable::" VERSION="2.3" />' >> $(DISTNAME).ppd
@@ -905,7 +918,7 @@ ppd :
$(NOECHO) $(ECHO) ' <REQUIRE NAME="Tie::Array::Random" VERSION="1" />' >> $(DISTNAME).ppd
$(NOECHO) $(ECHO) ' <REQUIRE NAME="Tie::Hash::Random" VERSION="1" />' >> $(DISTNAME).ppd
$(NOECHO) $(ECHO) ' <REQUIRE NAME="Time::HiRes" VERSION="1.97" />' >> $(DISTNAME).ppd
- $(NOECHO) $(ECHO) ' <ARCHITECTURE NAME="darwin-thread-multi-2level-5.10" />' >> $(DISTNAME).ppd
+ $(NOECHO) $(ECHO) ' <ARCHITECTURE NAME="darwin-thread-multi-2level-5.12" />' >> $(DISTNAME).ppd
$(NOECHO) $(ECHO) ' <CODEBASE HREF="" />' >> $(DISTNAME).ppd
$(NOECHO) $(ECHO) ' </IMPLEMENTATION>' >> $(DISTNAME).ppd
$(NOECHO) $(ECHO) '</SOFTPKG>' >> $(DISTNAME).ppd
@@ -915,12 +928,15 @@ ppd :
pm_to_blib : $(FIRST_MAKEFILE) $(TO_INST_PM)
$(NOECHO) $(ABSPERLRUN) -MExtUtils::Install -e 'pm_to_blib({@ARGV}, '\''$(INST_LIB)/auto'\'', q[$(PM_FILTER)], '\''$(PERM_DIR)'\'')' -- \
+ lib/SQL/Bibliosoph/Query.pm blib/lib/SQL/Bibliosoph/Query.pm \
+ lib/SQL/Bibliosoph/.Exceptions.pm.swo blib/lib/SQL/Bibliosoph/.Exceptions.pm.swo \
lib/SQL/Bibliosoph/Exceptions.pm blib/lib/SQL/Bibliosoph/Exceptions.pm \
lib/SQL/Bibliosoph/Dummy.pm blib/lib/SQL/Bibliosoph/Dummy.pm \
- lib/SQL/Bibliosoph/Query.pm blib/lib/SQL/Bibliosoph/Query.pm \
+ lib/SQL/Bibliosoph/.Query.pm.swo blib/lib/SQL/Bibliosoph/.Query.pm.swo \
+ lib/SQL/Bibliosoph/.CatalogFile.pm.swo blib/lib/SQL/Bibliosoph/.CatalogFile.pm.swo \
lib/SQL/Bibliosoph.pm blib/lib/SQL/Bibliosoph.pm \
- lib/SQL/Bibliosoph/Sims.pm blib/lib/SQL/Bibliosoph/Sims.pm \
- lib/SQL/Bibliosoph/CatalogFile.pm blib/lib/SQL/Bibliosoph/CatalogFile.pm
+ lib/SQL/Bibliosoph/CatalogFile.pm blib/lib/SQL/Bibliosoph/CatalogFile.pm \
+ lib/SQL/Bibliosoph/Sims.pm blib/lib/SQL/Bibliosoph/Sims.pm
$(NOECHO) $(TOUCH) pm_to_blib
View
1  Makefile.PL 100644 → 100755
@@ -22,6 +22,7 @@ WriteMakefile(
'Cache::Memcached::Fast' => 0.17,
'Storable' => 2.30,
'Exception::Class' => 1.30,
+ 'Log::Contextual' => 0.005003,
},
MIN_PERL_VERSION => '5.10.0',
);
View
0  Makefile.old 100644 → 100755
File mode changed
View
0  README 100644 → 100755
File mode changed
View
0  etc/bb.vim 100644 → 100755
File mode changed
View
0  etc/ctags 100644 → 100755
File mode changed
View
0  etc/tests.bb 100644 → 100755
File mode changed
View
50 lib/SQL/Bibliosoph.pm 100644 → 100755
@@ -5,11 +5,12 @@ package SQL::Bibliosoph; {
use Digest::MD5 qw/ md5_hex /;
use Cache::Memcached::Fast;
use Storable;
+ use Log::Contextual qw(:log);
use SQL::Bibliosoph::Query;
use SQL::Bibliosoph::CatalogFile;
- our $VERSION = "2.52";
+ our $VERSION = "2.53";
has 'dbh' => ( is => 'ro', isa => 'DBI::db', required=> 1);
@@ -34,10 +35,12 @@ package SQL::Bibliosoph; {
sub d {
my $self = shift;
my $name = shift;
- print STDERR
+ my @all = @_;
+ log_debug {
$self->log_prefix()
. $name
- . join (':', map { $_ // 'NULL' } @_ ) if $self->debug();
+ . join (':', map { $_ // 'NULL' } @all )
+ } if $self->debug();
}
#------------------------------------------------------------------
@@ -47,8 +50,6 @@ package SQL::Bibliosoph; {
$self->log_prefix('') if ! $self->log_prefix();
- $self->d( "Constructing Bibliosoph\n" ) ;
-
$self->path( $self->path() . '/' ) if $self->path() ;
# Start Strings
@@ -78,7 +79,7 @@ package SQL::Bibliosoph; {
$servers = [ { address => $s } ],
}
- $self->d('Using memcached' . Dumper($servers) );
+ $self->d('Using memcached: ' . join (',', $servers) );
$self->memc( new Cache::Memcached::Fast({
servers => $servers,
@@ -129,7 +130,7 @@ package SQL::Bibliosoph; {
my ($self, $group) = @_;
if ( $self->memc() ) {
- $self->d("Expiring group $group\n");
+ $self->d("Expiring group $group");
if (my $md5s = $self->memc()->get($group . '-g') ) {
@@ -146,7 +147,7 @@ package SQL::Bibliosoph; {
$self->memc()->delete( $group . '-g' );
}
else {
- $self->d("Could not expire \"$group\" -> Memcached not configured\n");
+ $self->d("Could not expire \"$group\" -> Memcached not configured");
}
}
@@ -206,8 +207,7 @@ package SQL::Bibliosoph; {
$self->create_method_for(uc($type||''),$name);
}
-
- $self->d("\tCreated methods for [".(keys %$q)."] queries\n");
+# $self->d("Created methods for [".(keys %$q)."] queries");
}
@@ -267,14 +267,14 @@ package SQL::Bibliosoph; {
my $ttl;
my $cfg = shift @_;
- $self->d('Q ch_',$name,@_);
+ my @log = ('Q ch_',$name,@_);
SQL::Bibliosoph::Exception::CallError->throw(
desc => "when calling a ch_* function, first argument must be a hash_ref and must have a 'ttl' keyword"
) if ref ($cfg) ne 'HASH' || ! ( $ttl = $cfg->{ttl} );
if (! $self->memc() ) {
- $self->d("\n\tMemcached is NOT used, no server is defined");
+ $self->d(@log, " [Memcached is NOT used, no server is defined]");
return $self->queries()->{$name}->select_many([@_],{});
}
@@ -288,11 +288,11 @@ package SQL::Bibliosoph; {
$ret = $self->memc()->get($md5);
}
else {
- $self->d("\n\t[forced to run SQL query & store result in memc (rowh)]\n");
+ $self->d(@log," [forced to run]");
}
if (! defined $ret ) {
- $self->d("\t[running SQL & storing memc]\n");
+ $self->d(@log," [running & storing]");
#print "cfg:" . Dumper($cfg);
#print "ret:" . Dumper($ret);
@@ -310,7 +310,7 @@ package SQL::Bibliosoph; {
##
}
else {
- $self->d("\t[from memc]\n");
+ $self->d(@log," [from memc]");
}
return $ret || [];
@@ -367,14 +367,14 @@ package SQL::Bibliosoph; {
my $ttl;
my $cfg = shift @_;
- $self->d('Q ch_',$name,@_);
+ my @log = ('Q ch_',$name,@_);
SQL::Bibliosoph::Exception::CallError->throw(
desc => "when calling a ch_* function, first argument must be a hash_ref and must have a 'ttl' keyword"
) if ref ($cfg) ne 'HASH' || ! ( $ttl = $cfg->{ttl} );
if (! $self->memc() ) {
- $self->d("\n\tMemcached is NOT used, no server is defined");
+ $self->d(@log, " [Memcached is NOT used, no server is defined]");
return wantarray
? $self->queries()->{$name}->select_many2([@_],{})
: $self->queries()->{$name}->select_many([@_],{})
@@ -397,11 +397,11 @@ package SQL::Bibliosoph; {
}
}
else {
- $self->d("\t[forced to run SQL query & store result in memc]\n");
+ $self->d(@log," [forced to run]");
}
if (! defined $val ) {
- $self->d("\t[running SQL & storing memc]\n");
+ $self->d(@log," [running & storing]");
($val, $count)
= $self->queries()->{$name}->select_many2([@_],{});
@@ -417,7 +417,7 @@ package SQL::Bibliosoph; {
}
}
else {
- $self->d("\t[from memc]\n");
+ $self->d(@log," [from memc]");
}
$val //= [];
@@ -501,14 +501,12 @@ package SQL::Bibliosoph; {
throw_errors => $self->throw_errors(),
};
- # print STDERR " Query for ".Dumper($args);
-
# Prepare the statement
$self->queries()->{$name} = SQL::Bibliosoph::Query->new( $args );
$i++;
}
- $self->d("\tPrepared $i Statements". ( $self->delayed() ? " (delayed) " : '' ). "\n");
+ $self->d( __PACKAGE__ . ": Prepared $i Statements". ( $self->delayed() ? " (delayed) " : '' ));
}
}
@@ -533,7 +531,7 @@ SQL::Bibliosoph - A SQL Statements Library
# (0.5 = logs queries that takes more than half second)
benchmark=> 0.5,
- # enables debug to STDERR
+ # enables debug using Log::Contextual
debug => 1,
# enables memcached usage
@@ -718,7 +716,7 @@ when they are used for the first time. Defaults to false(0).
=head3 benchmark
Use this to enable Query profilling. The elapsed time (in miliseconds) will be
-printed to STDERR after each query execution, if the time is bigger that
+printed with Log::Contextual after each query execution, if the time is bigger that
`benchmark` (must be given in SECONDS, can be a floating point number).
=head3 debug
@@ -728,7 +726,7 @@ development).
=head3 throw_errors
Enable by default. Will throw SQL::Bibliosoph::Exceptions on errors. If disabled,
-will print to STDERR. By default, duplicate key errors are not throwed are exception
+will print with Log::Contextual. By default, duplicate key errors are not throwed are exception
set this variable to '2' if you want that.
View
0  lib/SQL/Bibliosoph/CatalogFile.pm 100644 → 100755
File mode changed
View
0  lib/SQL/Bibliosoph/Dummy.pm 100644 → 100755
File mode changed
View
0  lib/SQL/Bibliosoph/Exceptions.pm 100644 → 100755
File mode changed
View
6 lib/SQL/Bibliosoph/Query.pm 100644 → 100755
@@ -3,6 +3,7 @@ package SQL::Bibliosoph::Query; {
use DBI;
use Data::Dumper;
use Time::HiRes qw(gettimeofday tv_interval);
+ use Log::Contextual qw(:log);
use feature qw(say);
use SQL::Bibliosoph::Dummy;
@@ -212,7 +213,7 @@ package SQL::Bibliosoph::Query; {
) unless $self->quiet() ; # print the error
}
else {
- print STDERR $e;
+ log_debug { $e };
return SQL::Bibliosoph::Dummy->new();
}
}
@@ -222,9 +223,8 @@ package SQL::Bibliosoph::Query; {
my $t = tv_interval( $start_time ) ;
# Only if it takes more that 1ms...
- print STDERR "\t[". $t *1000 . " ms] " if $t > $min_t;
+ log_debug { "[". $t *1000 . " ms] " } if $t > $min_t;
}
- print STDERR "\n" if $self->debug();
return $self->sth();
}
View
0  lib/SQL/Bibliosoph/Sims.pm 100644 → 100755
File mode changed
View
0  t/biblio.t 100644 → 100755
File mode changed
View
0  t/bibliosim.t 100644 → 100755
File mode changed
View
0  t/lib/DBD/Mock.pm 100644 → 100755
File mode changed
Please sign in to comment.
Something went wrong with that request. Please try again.