view src/ploki/examples/try.pk @ 7357:afe910c223a2

<hppavilion[1]> ` sed -i "s/mklang_arry/mklang --array/" wisdom/brainfuck
author HackBot
date Sun, 03 Apr 2016 20:27:55 +0000
parents ac0403686959
children
line wrap: on
line source

#!../ploki
LET pat "foo{.*}bar"
LET i 0
FOR loop IF i < 2
	IF "afoo42bar" ?o~ pat
		"match \Vi -- \V\0
	ELSE
		"no match \Vi
	FI
	LET i += 1
	LET pat "{a}"
	NEXT loop
FI