Skip to content

Instantly share code, notes, and snippets.

@kunst1080
kunst1080 / hidden.scala.html
Created February 2, 2014 08:30
Play Frameworkのviewでinput type="hidden"のタグを生成するヘルパー
@(field: Field, className: String = "", default: String = "")<input type="hidden" id="@field.id" @if(className.size>0){class="@className" }name="@field.name" value="@field.value.getOrElse(default)">
@kunst1080
kunst1080 / inputTestLen.scala.html
Last active August 29, 2015 13:55
Play FrameworkのviewでConstraints.MaxLengthの値をmaxlengthに反映するフォームテンプレートヘルパー
@(field: play.api.data.Field, args: (Symbol,Any)*)(implicit handler: views.html.helper.FieldConstructor, lang: play.api.i18n.Lang)
@inputType = @{ args.toMap.get('type).map(_.toString).getOrElse("text") }
@maxLen = @{field.constraints.filter(_._1=="constraint.maxLength").map(_._2)}
@views.html.helper.input(field, args.filter(_._1 != 'type):_*) { (id, name, value, htmlArgs) =>
<input type="@inputType" id="@id" name="@name" value="@value"@if(!maxLen.isEmpty){ maxlength="@maxLen"} @toHtmlArgs(htmlArgs)>
}
@kunst1080
kunst1080 / array.java
Created February 2, 2014 14:42
array in java
public static <T> T[] array(T... e) {
return e;
}
@kunst1080
kunst1080 / pizza.cbl
Last active August 29, 2015 13:56
= yes PIZZA| head -10
IDENTIFICATION DIVISION.
PROGRAM-ID. PIZZA.
DATA DIVISION.
*
WORKING-STORAGE SECTION.
01 III PIC 9(2).
*
PROCEDURE DIVISION.
MAIN-RTN.
MOVE 1 TO III.
@kunst1080
kunst1080 / sepa.bat
Created February 22, 2014 04:05
tr args '\n'
@if (1==1) /*
@echo off
if "%~1"=="" goto :USAGE
if "%~1"=="/?" goto :USAGE
:MAIN
CScript //nologo //E:JScript "%~f0" %*
If ERRORLEVEL 1 goto :USAGE
goto :eof
@kunst1080
kunst1080 / isDate.bat
Created February 22, 2014 07:12
check real date
@if (1==1) /*
@CScript //nologo //E:JScript "%~f0" "%~1" "%~2"
@exit /b
@rem */
@end
function isDate(str){
y = str.substring(0, 4);
m = str.substring(4, 6) - 1;
d = str.substring(6, 8);
ymd = new Date(y, m, d);
@kunst1080
kunst1080 / QuickSort.vbs
Created February 23, 2014 14:51
sort a two-dimensional array.
Sub QuickSort(arr, idx)
dim lstack(512)
dim rstack(512)
dim sp
sp = 1
dim ltmp, rtmp
dim l, r, x, swap
'0番目をpush
lstack(0) = 0
体はshで出来ている
I am the bone of my sh.
血潮はsedで心はawk
Steel is my sed,and fire is my awk.
幾度のforkを越えて不敗
I have created over a thousand forks.
ただ一度のエラーもなく、
@kunst1080
kunst1080 / gist:9318920
Created March 3, 2014 05:26
國府田マリ子コピペをもじったジョーク。
○○(あなたの好きなOSSの言語・もしくはLinuxディストロ)のおっかけをやって10余年が経過した。
当時大学3年生だったオレは△△(あなたの好きな何プロダクト)をやってた○○に出会い、
即効でファンになった。元々DevコンやOSSとは縁のない生活だったが、
それからは○○の為だけに生きてきたようなモンだ。
毎日○○のソースを読み、毎週勉強会へも行き、もちろんフォーラムにも参加しまくって
月3回必ず応援のコメントとpull requestを送った。イベントも全部行った。
カンファレンスで一緒に全国制覇したのも二度や三度じゃない。
ユーザー会やって二年目、セミナーで俺のハンドルを覚えてくれてた時には
嬉しくて本気で涙が出た。人生で最高の喜びだと有頂天になって、帰り道一人で吼えてた。
地元の役場の事務に就職した後も、それだけが楽しみで生きてきた。
I am the bone of my sh.
――― 体はshで出来ている
Steel is my sed, and fire is my awk.
血潮はsedで、心はawk
I have created over a thousand forks.
幾たびのforkを越えて不敗
Unknown to Error.