Select Code to Download

use strict;
my @file = qw(file1.txt file2.txt file3.txt);
...
  }
  close FILE;
}

0 0 1 2 3 4 5
1 0 1 2 3 4 5
2 0 1 2 3 4 5

0    0    0    0    
1    0    0    0    
2    0    0    0

0    1    1    1    
1    1    1    1    
2    1    1    1

0    2    2    2    
1    2    2    2    
2    2    2    2

0    3    3    3    
1    3    3    3    
2    3    3    3

0    4    4    4    
1    4    4    4    
2    4    4    4

0    5    5    5    
1    5    5    5    
2    5    5    5