kunst1080

for /l %i in (1,1,100) do @((set/a a=%i%3,b=%i%5)>nul & if !a!!b!==00 (echo FizzBuzz) else (if !b!==0 (echo Buzz) else if !a!==0 (echo Fizz) else (echo %i)))

kunst1080

set /a n1=1,n2=1 & for /L %a in (3,1,10) do @((set /a n3=n1+n2,n1=n2,n2=n3)>nul & echo %a:!n3!)

kunst1080

2014春アニメ 視聴予定

視聴予定のものだけ

※太字斜体は録画予約がまだのもの

日曜日(Sunday)

• 24:30 BS11 一週間フレンズ。
• 25:00 サンテレビ 彼女がフラグをおられたら

月曜日(Monday)

kunst1080

#! /usr/bin/perl
my $length = $ARGV[0];

binmode(STDIN);
while (sysread(STDIN, my $buf, $length)) {
    print $buf . "\n";
}

kunst1080

#!/usr/bin/perl
while(defined($_ = <STDIN>)) {
    chomp $_;
    my $template = $ARGV[0];
    my @o=unpack("$template", $_);
    print join(",",@o) . "\n";
}

kunst1080

# 仕様:
#  ホーム画面の領域を「field」とする。
#  fieldは[縦][横]の２次元配列。
#  fieldの各マスについて、配置できるウィジェットの高さ毎の最大横幅を持を格納した２次元配列を「fmap」とし、
#  縦幅と最大横幅ごとに配置可能なマスの数を集計したものを「wctable」とする。
#
#  ホーム画面に配置するウィジェットの属性を「widget」とし、その配列を「widgets」とする。
#
#  判定について
#    fieldのマスに対し、widgetをいくつ配置できるか判定する

kunst1080

#!/bin/bash

WORKDIR=anubis

mkdir -p $WORKDIR
cat Data.csv | awk 'NR>1' | tr ',' '/' | xargs -I% echo mkdir -p $WORKDIR/% | sh

function spread() {
    echo "<td rowspan=\"`find "$2" | wc -l`\">$1</td>"
    ls "$2" | while read L

kunst1080

#!/bin/sh

USAGE(){
cat <<++EOS >&2
USAGE:`basename $0` jail_name ip_address flavor [ -y root_password default_user default_user_password ]
++EOS
}

# Const
NIC=em1

kunst1080

#!/bin/sh

USAGE(){
cat <<++EOS >&2
USAGE:`basename $0` jail_name ip_address user_flavor [ -y root_password default_user default_user_password ]
++EOS
}

# const
PREFIX=/usr/jails

kunst1080

#!/bin/sh

readonly PREFIX=/usr/jails

resolvconf -u

ls $PREFIX/*/etc/resolv.conf | xargs -I@ cp -v /etc/resolv.conf @
ls $PREFIX/flavors/*/etc/resolv.conf | xargs -I@ cp -v /etc/resolv.conf @

resolvconf -l