##
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");