Numbers.txt 33 5 34 7 36 7 37 8 38 0 etc #### full_numbers.txt 1 0 2 0 3 0 4 0 … 33 5 34 7 36 7 37 8 38 0 … 3000050 0 #### #!/usr/bin/perl $spacer = "\t"; $INPUTFILE = "/Users/ts/desktop/work/numbers.txt"; open(INPUTFILE) or die("File error: input file\n"); open (OUTPUTFILE, "/Users/ts/desktop/work/full_numbers.txt");