shithub: sm2

ref: 3fefdf7e247a5e869097f51716055a386950d3c5
dir: /bin/sm2ger/

View raw version 
#!/bin/rc -e
p=$home/p/sm2/ger
cd $p || exit
awk -v 'nword='20 '
{
	d[NR] = $0
}
END{
	srand()
	for(i=1; i<=nword; i++){
		do
			x = int(rand()*1e6) % length(d)
		while(! (x in d))
		h[i] = d[x]
		delete d[x]
	}
	for(i in h)
		print h[i] >>"db0"
	for(i in d)
		print d[i]
}' db >/tmp/sm2.$pid
mv /tmp/sm2.$pid db
's&m2' db0 >db1
cp db1 db0