From: Chris Nehren Date: Sun, 19 Aug 2012 03:56:55 +0000 (+0000) Subject: use STDERR not STDOUT for debugging the perl libdir probe X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=6db6476d042dff195a9709f07d0ce38f3c7ad210;p=scpubgit%2FSystem-Introspector.git use STDERR not STDOUT for debugging the perl libdir probe --- diff --git a/lib/System/Introspector/Probe/LibDirs/Perl.pm b/lib/System/Introspector/Probe/LibDirs/Perl.pm index b88b689..f242af1 100644 --- a/lib/System/Introspector/Probe/LibDirs/Perl.pm +++ b/lib/System/Introspector/Probe/LibDirs/Perl.pm @@ -13,7 +13,7 @@ has root => ( default => sub { '/' }, ); -sub _log { shift; printf "[%s] %s\n", scalar(localtime), join '', @_ } +sub _log { shift; warn sprintf "[%s] %s\n", scalar(localtime), join '', @_ } sub gather { my ($self) = @_;