Select Code to Download

#!/usr/bin/perl
use strict;
...
for my $v (@value) {
    print join(" ", @$v), "\n";    
}

Line_1_1 Line_2_1 Line_3_1 Line_4_1 Line_5_1 Line_6_1 Line_7_1
Line_1_2 Line_2_2 Line_3_2 Line_4_2 Line_5_2 Line_6_2 Line_7_2
Line_1_3 Line_2_3 Line_3_3 Line_4_3 Line_6_3 Line_6_3 Line_7_3
Line_1_4 Line_2_4 Line_3_4 Line_4_4 Line_5_4 Line_6_4 Line_7_4