printf $out_file "string length = %d\n",length($num) ;