Create a table to represent tree nodes.
CREATE TABLE `tree_node` (
`id` int(10) unsigned NOT NULL AUTO_INCREMENT,
`data_body` text,
node_deleted datetime DEFAULT NULL,
| package DenisYurashkuFindIndex; | |
| use strict; | |
| use utf8; | |
| sub new { | |
| my $invocant = shift; | |
| my $class = ref($invocant) || $invocant; | |
| my $self = {}; | |
| bless($self, $class); | |
| $self->{STEPS} = 0; |
| #!/usr/bin/perl -w | |
| # | |
| use strict; | |
| use feature ':5.10'; | |
| use utf8; | |
| use open qw(:std :utf8); | |
| use DDP; | |
| use Term::ANSIColor qw(:constants); | |
| $Term::ANSIColor::AUTORESET = 1; |
| #!/bin/bash | |
| # | |
| # Usage: git_files <BRANCH> | |
| # | |
| # Get all files created/changed in the BRANCH | |
| # | |
| git diff --stat `git merge-base master $1`..$1 |
| #!/bin/bash | |
| PROGNAME=${0##*/} | |
| INPUT='' | |
| QUIET='0' | |
| NOSTATS='0' | |
| max_input_size=0 | |
| max_output_size=0 | |
| usage() |
| pm list packages -f |
| #!/usr/bin/env perl | |
| use Mojolicious::Lite -signatures; | |
| get '/' => sub ($c) { | |
| $c->render(template => 'index'); | |
| }; | |
| get '/api/:region' => sub ($c) { | |
| my %regions = ( |
| -- Fix albums display order | |
| -- Changes the "sort album" field, to ensure that albums get displayed in chronological order on iPods. | |
| -- CC-BY-NC 2011, Jean-Karim Bockstael, | |
| tell application "iTunes" | |
| -- input checking | |
| if selection is {} then | |
| display dialog "You must select at least a track" | |
| return | |
| else | |
| set selected_tracks to selection |
| # vim: syntax=config | |
| ########### | |
| # General # | |
| ########### | |
| priority=high | |
| input-ipc-server=/tmp/mpvsocket # listen for IPC on this socket | |
| load-stats-overlay=yes # use local stats.lua |
| #!/bin/bash | |
| ############################################################################## | |
| # Author: Peter Gordon <[email protected]> | |
| # License: Public Domain | |
| ############################################################################## | |
| # gresource-extract.sh | |
| # Version: 1 | |
| # | |
| # This Bash script is designed to extract all resource files in a given | |
| # GResource file, with the given base folder. For example, if a GResource file |