wolfsage

BEGIN {
  # Only load up the callback if Devel::MemoryTrace::Light is being used
  if ($Devel::MemoryTrace::Light::VERSION) {

        my %stats;

        # Override default output when memory change is detected
        DB::set_callback(
          sub  {
                my ($pkg, $file, $line, $bytes) = @_;

wolfsage

#!/usr/bin/perl

use strict;
use warnings;

my $string = 'x' x (1024 * 1024 * 8);

print "Before match\n";

$string =~ /x/;

wolfsage

#!/usr/bin/perl

use strict;
use warnings;

$|++;

use Time::HiRes qw(gettimeofday);

my $start;

wolfsage

Test 

wolfsage

Test 

wolfsage

You are running Catalyst::Engine::PSGI, which is considered a legacy engine for
this version of Catalyst.  We will continue running and use your existing psgi
file, but it is recommended to perform the trivial upgrade process, which will
leave you with less code and a forward path.

Please review Catalyst::Upgrading
env as a writer is deprecated, you probably need to upgrade Catalyst::Engine::PSGI at /usr/local/share/perl/5.10.1/Catalyst/Engine.pm line 27.
Use of uninitialized value in string eq at /home/mhorsfall/gitrepos/metacpan-web/lib/MetaCPAN/Web/Controller/Activity.pm line 24.
Use of uninitialized value in string eq at /home/mhorsfall/gitrepos/metacpan-web/lib/MetaCPAN/Web/Controller/Activity.pm line 24.
Use of uninitialized value in string eq at /home/mhorsfall/gitrepos/metacpan-web/lib/MetaCPAN/Web/Controller/Activity.pm line 24.

wolfsage

Archive::Any::Plugin
Captcha::reCAPTCHA
Catalyst::Authentication::User
Catalyst::Controller
Catalyst::Model
Catalyst::Plugin::Session::Store
Catalyst::Utils
Catalyst::View
Log::Log4perl::Appender::ScreenColoredLevels
Plack::App::Directory

wolfsage

diff --git a/lib/MetaCPAN/Script/Release.pm b/lib/MetaCPAN/Script/Release.pm
index d094964..6b05ad8 100644
--- a/lib/MetaCPAN/Script/Release.pm
+++ b/lib/MetaCPAN/Script/Release.pm
@@ -120,6 +120,9 @@ sub run {
     }
     log_info { scalar @files, " tarballs found" } if ( @files > 1 );
 
+    # Hack? Lower versions before higher versions
+    @files = sort @files;

wolfsage

mhorsfall@darmstadtium:~/git/cpan-api$ bin/metacpan release authors/TEST/
2012/03/31 04:49:49 I release: Looking for tarballs in authors/TEST/
2012/03/31 04:49:49 W release: /home/mhorsfall/CPAN/modules/06perms.txt could not be found.
2012/03/31 04:49:49 I release: Processing authors/TEST/Template-Simple-0.05.tar.gz
Use of uninitialized value $_[0] in join or string at /usr/local/share/perl/5.12.4/ElasticSearchX/Model/Util.pm line 18.
Use of uninitialized value $pauseid in substr at /home/mhorsfall/git/cpan-api/bin/../lib/MetaCPAN/Util.pm line 38.
Use of uninitialized value $pauseid in substr at /home/mhorsfall/git/cpan-api/bin/../lib/MetaCPAN/Util.pm line 38.
Use of uninitialized value $pauseid in sprintf at /home/mhorsfall/git/cpan-api/bin/../lib/MetaCPAN/Util.pm line 38.
2012/03/31 04:49:49 F release: encountered object 'authors/TEST/Template-Simple-0.05.tar.gz', but neither allow_blessed nor convert_blessed settings are enabled at /usr/local/share/perl/5.12.4/ElasticSearch/Transport.pm line 210.

wolfsage

# Usage: dc < quadratic.dc
# Shortened to: dc -e '1 3 _4 2kscsbsa[X=]sf[lb2^4lalc**-v]sdlb_1*ldx-2la*/lfPplb_1*ldx+2la*/lfPp'

# Solves:
# x^2 + 3x – 4 = 0

1                              # A
3                              # B
_4                             # C