line-mode
push-a
lines
sort #(list)
( "\xfd\x03\x0b\xb4qh\xf2\x0c>k" )
256
base #(list to num)
binary #(num to list)
compress
member
w( "prog" "ikea" )
get