yuuki

#!/usr/bin/env perl
use strict;
use warnings;

my $hoge = undef;
$hoge->{key} = 10;

use Data::Dumper;
local $Data::Dumper::Indent = 1;
local $Data::Dumper::Terse  = 1;

yuuki

ROM base

RUN apt-get update
RUN apt-get install -y --force-yes build-essential curl git vim
RUN apt-get install -y --force-yes openssh-server openssh-client
RUN apt-get clean

# workaround
RUN dpkg-divert --local --rename --add /sbin/initctl
RUN ln -fs /bin/true /sbin/initctl

yuuki

package MyTest;
use utf8;
use strict;
use warnings;
use parent qw(Test::Class);

use Test::More;

sub t1 : Tests {
    subtest 'is it ok if I die?' => sub {

yuuki

function <SNR>34_browse_check..vimfiler#handler#_event_handler..<SNR>80_on_BufReadCmd..unite#vimfiler_check_filetype..<SNR>82_initial
ize_context の処理中にエラーが検出されました:
行    1:
E121: 未定義の変数です: g:unite_winwidth
E15: 無効な式です: { 'input' : '', 'start_insert' : g:unite_enable_start_insert, 'complete' : 0, 'script' : 0, 'col' : col('.'), 'no_
quit' : 0, 'buffer_name' : 'default', 'profile_name' : '', 'prompt' : g:unite_prompt, 'default_action' : 'default', 'winwidth' : g:un
ite_winwidth, 'winheight' : g:unite_winheight, 'immediately' : 0, 'no_empty' : 0, 'auto_preview' : 0, 'auto_highlight' : 0, 'vertical
' : g:unite_enable_split_vertically, 'direction' : g:unite_split_rule, 'no_split' : 0, 'temporary' : 0, 'verbose' : 0, 'auto_resize'
: 0, 'old_buffer_info' : [], 'toggle' : 0, 'quick_match' : 0, 'create' : 0, 'cursor_line_highlight' :    g:unite_cursor_line_highligh
t, 'no_cursor_line' : 0, 'update_time' : g:unite_update_time, 'no_buffer' : 0, 'hide_source_names' : 0, 'max_multi_lines' : 5, 'here'

yuuki

#!/bin/sh
exec 2>&1
export PERL_PATH=/opt/perl-5.14/bin/perl
exec $PERL_PATH /opt/perl-5.14/bin/growthforecast.pl --data-dir /home/growthforecast/growthforecast  --port 80 -- \
             setuidgid growthforecast

yuuki

#!/bin/sh
exec 2>&1
exec /usr/bin/setuidgid growthforecast multilog t /etc/service/growthforecast/log/main

yuuki

cmd_push() {
  parse_remote_name "$@"
  if [ -z "$REMOTE" ]; then
    REMOTE="$ORIGIN"
  fi
  name_or_current

  # sanity checks
  require_clean_working_tree
  require_branch "$BRANCH"

yuuki

perl -MConfig -e 'print $Config{archname}'

yuuki

cpan -l 2>/dev/null | cut -f1

yuuki

test for daily coding