for($b=0;$b<$cnt;$b++){$a=$b+1;###$cnt---is number of entries in the hash
print AAA"print\"\$lng{\'$a\'}<br />\\n\"\;\n";
print AAA"print\"<input type=\\\"text\\\"name=\\\"nl$a\\\"size=\\\"200\\\"><br />\\n\"\;\n";
}