1 2
au BufRead,BufNewFile *.bqn setf bqn au BufRead,BufNewFile * if getline(1) =~ '^#!.*bqn$' | setf bqn | endif
