open ${fileno}, ">>$filename"; #### printf ${fileno} "%s\n", $myline;