sycobuny

So, there's a single distinctly good reason to use modules that have already been written: they're already written, which means you don't have to write them. That saves time off your schedule from blank file to completed product. However, in the Perl world at least, it feels that there's reason to assume this may not always be the best course of action.

I'm actively considering writing (and somewhat [working on][plmodel]) a database for library along the lines of [Sequel][sequel]. I've looked at [RoseDB][rosedb] and [DBIx][dbix] and neither really seemed to match the It Just Works simplicity of Sequel for basic ad-hoc querying/runtime object construction, nor the flexibility and power of building more complex queries without advanced SQL knowledge. Your mileage will vary on whether you feel building complex queries entirely in Perl should be necessary, some will say you should just write raw SQL if it's that necessary, and that's a valid point but not one I'll be discussing.

Database libraries are, ho

sycobuny

"""""""""""""""""""""
" SYNTAX HIGHLIGHTING
"""""""""""""""""""""
set t_Co=256
syntax enable
highlight comment ctermbg=blue
highlight comment ctermfg=gray
highlight constant ctermfg=red
highlight type ctermfg=green
highlight preproc ctermfg=blue

sycobuny

<?php

    foreach (array('literal', 'identifier', 'qualified_identifier',
                   'join_condition', 'conditional', 'grouping', 'limiting',
                   'ordering') as $__) {
        $__ = join(DIRECTORY_SEPARATOR, array(dirname(__FILE__), "$__.php"));
        include_once($__);
    }
    unset($__);

sycobuny

_QueryExpression (interface)
 |
 | - _QueryFunction (interface)
 |
 | - _QueryTableExpression (interface)
 |
 | - _QueryValueExpression (interface)


_QueryAliasableExpression (abstract, implements _QueryExpression)

sycobuny

<?php

    class _QueryTable extends _QueryTableExpression {
        private $identifier;

        function __construct($identifier, $alias = null) {
            $this->identifier = _QueryIdentifier::create($identifier, $alias);
        }

        public static function create($identifier, $alias = null) {

sycobuny

Sequel.migration do
    change do
        create_table :guests
            primary_key :id

            String :first_name, :null => false
            String :last_name,  :null => false

            String :street
            String :city

sycobuny

<?php

    $__TEST__COUNT__     = 0;
    $__TEST__SUCCESS__   = 0;
    $__TEST__FAILURE__   = 0;
    $__EXPECTED__TESTS__ = null;

    function no_plan() {
        global $__EXPECTED__TESTS__;
        $__EXPECTED__TESTS__ = 'none';

sycobuny

#!/usr/bin/env ruby

# discover OS information to see if we should use pygments to colorize code
if RUBY_PLATFORM =~ /cygwin|mswin|mingw|bccwin|wince|emx/
    # no clue if this will work at all on windows, so whatever
    USE_PYGMENTS       = true
    PYGMENTS_BLACKLIST = []
elsif RUBY_PLATFORM =~ /darwin/
    version = `sw_vers -productVersion`
    if version =~ /^10\.7/

sycobuny

#!/usr/bin/env ruby

class SomeClass
    def self.add_two_numbers(one, two)
        one + two
    end

    def add_two_numbers(one, two)
        self.class.add_two_numbers(one, two)
    end

sycobuny

node testnode {
    git::repository { "repo":
        # default values
        server_user => "root",
        owner_user  => "root",
        owner_group => "root",
        target_dir  => "repo",
        githost     => "githost",
        gituser     => $server_user,
        target_dir  => $name,