preaction

#----------------------------------------------------------------------------
# Remove the orphan version tags, tags with no revisions in them
sub removeOrphanedVersionTags {
    my $session = shift;
    print "\tRemoving orphan version tags (this may take a while)... " unless $quiet;

    my $sth = $session->db->read(
        "SELECT tagId FROM assetVersionTag",
    );
    while ( my ($tagId) = $sth->array ) {

preaction

Let Testing Reign!

Effective immediately, every WebGUI developer (including myself) is on notice! For too long have we been lenient regarding improving our automated test suite or even running our automated test suite.

Starting now, every commit to WebGUI stable and beta branches will be required to include regression tests. This can be unit tests for API methods or Selenium tests for web interfaces. To enforce this, any commit that (1) causes a failing test, (2) does not include tests, or (3) reduces test coverage, will be immediately reverted. Once the patch is fixed, it can be recommitted. 

There will be no exceptions to this rule. We are all responsible for keeping WebGUI as bug-free as possible. Each version of WebGUI should be more stable than the last.

If there are any questions or grievances, you can direct them to (doug AT plainblack.com). Requests for exemptions will probably be denied, there is very little that cannot be tested in some way. If you don't know how to test something, ask the #webg

preaction

WebGUIx::Handler::PSGI
	passes Plack request object to...
	WebGUIx::Handler::DoSomethingWithPlackRequest
		passes Plack request object to...
		WebGUIx::Handler::OpenSession
			passes session to...
			WebGUIx::Handler::Content
				passes session to...
				WebGUIx::Handler::Asset
				passes template out...

preaction

package WebGUI::Form::AlumniCountry;

=head1 LEGAL

 -------------------------------------------------------------------
  WebGUI is Copyright 2001-2006 Plain Black Corporation.
 -------------------------------------------------------------------
  Please read the legal notices (docs/legal.txt) and the license
  (docs/license.txt) that came with this distribution before using
  this software.

preaction

use strict;
use warnings;

my $TIMEOUT = 2;

# Automatically run commands on multiple systems

my @hosts = qw(

preaction

                 s/iter     CHI Null WebGUI Memcached CHI Memcached CHI FastMmap
CHI Null           1.55           --              -6%          -45%         -46%
WebGUI Memcached   1.46           6%               --          -41%         -43%
CHI Memcached     0.860          80%              70%            --          -2%
CHI FastMmap      0.840          85%              74%            2%           --

preaction

#!/usr/bin/env perl

#-------------------------------------------------------------------
# WebGUI is Copyright 2001-2009 Plain Black Corporation.
#-------------------------------------------------------------------
# Please read the legal notices (docs/legal.txt) and the license
# (docs/license.txt) that came with this distribution before using
# this software.
#-------------------------------------------------------------------
# http://www.plainblack.com                     info@plainblack.com

preaction

                 s/iter CHI Null WebGUI Memcached WebGUI File WebGUI DB CHI Memcached CHI FastMmap
CHI Null           1.55       --              -5%        -24%      -40%          -44%         -45%
WebGUI Memcached   1.47       5%               --        -20%      -37%          -41%         -43%
WebGUI File        1.18      31%              25%          --      -22%          -26%         -28%
WebGUI DB         0.923      67%              59%         27%        --           -6%          -8%
CHI Memcached     0.866      79%              70%         36%        7%            --          -2%
CHI FastMmap      0.845      83%              74%         39%        9%            2%           --

preaction

                   Rate WebGUI File WebGUI DB CHI Memcached CHI FastMmap WebGUI Memcached CHI Null
WebGUI File      2.23/s          --      -66%          -72%         -75%             -76%     -83%
WebGUI DB        6.62/s        197%        --          -16%         -25%             -29%     -48%
CHI Memcached    7.87/s        254%       19%            --         -10%             -16%     -39%
CHI FastMmap     8.77/s        294%       32%           11%           --              -6%     -32%
WebGUI Memcached 9.35/s        320%       41%           19%           7%               --     -27%
CHI Null         12.8/s        476%       94%           63%          46%              37%       --

preaction

# autoplex.pl
# Automatically run commands on multiple systems
# Licensed under the BSD or Artistic license (at users discretion)
# Copyright 2009 Doug Bell

# Usage: 
#  autoplex.pl -u <user> -p     # Prompt for password once and use it for each server
#  autoplex.pl -u <user> -P     # Prompt for password every time
      
use strict;