racke

#! /usr/bin/env perl
# 
# Dancer session expiration script.
#
# Copyright (C) 2011 Stefan Hornburg (Racke) <[email protected]>
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.

racke

package Dancer::Plugin::InterchangeLink;

use 5.006;
use strict;
use warnings;

use Socket;
use HTTP::Response;

use Dancer ':syntax';

racke

Table attributes:

attributes_id: AUTO
name: name / code of attribute
title: displayed title of attribute

Table attributes_values:

attributes_values_id: AUTO
attributes_id: FOREIGN KEY attributes::attributes_id

racke

#! /bin/bash
#
# Very basic init script for usage with eShop.
#
# Copyright 2013 Stefan Hornburg (Racke) <[email protected]>.

SOLR_HOME="$HOME/solr/example"
SOLR_LOGFILE=$(readlink -f ../../logs/solr.log)
SOLR_PIDFILE=$(readlink -f ../../run/solr.pid)

racke

#! /usr/bin/env perl

use strict;
use warnings;

use Dancer ':script';
use Getopt::Long;
use Dancer::Plugin::Interchange6;

my $duration;

racke

#!/usr/bin/env perl

use strict;
use warnings;
use File::Spec;
use File::Copy::Recursive qw/rcopy/;
use File::Find;
use Data::Dumper;
use XML::Twig;
use File::Path qw/mkpath/;

racke

package Dancer::Plugin::Interchange5::SessionCrossover;

use warnings;
use strict;
use Dancer::Plugin;
use Dancer qw/:syntax/;
use Storable qw/thaw freeze/;

# this plugin nesting is not going to work with D2, until further notice :-\
use Dancer::Plugin::Database;

racke

#!/bin/bash

# determine camp number
for CAMPDIR in "$PWD" "${PWD%/*}" "${PWD%/*/*}"; do
    if [[ $CAMPDIR =~ ([[:digit:]]+)$ ]]; then
        CAMPNUMBER=${BASH_REMATCH[1]}
       break
    fi
done

racke

#!/usr/bin/env perl

use warnings;
use strict;

use Dancer qw/:script/;
use Dancer::Plugin::DBIC;
use DBIx::Class::DeploymentHandler;

my $schema = schema;

racke

git filter-branch \
    --prune-empty \
    --index-filter '
        git ls-tree -z -r --name-only --full-tree $GIT_COMMIT \
        | grep -z -v "^applications/CalevoMobile/lib/CalevoMobile/Schema" \
        | xargs -0 -r git rm --cached -r
    ' \
    -- \
    feature/split_out_schema   
git filter-branch \