Select Code to Download

#!/usr/bin/perl -w
use strict;

...
    push @y3, shift @val;
    push @y4, shift @val;
}

#!/usr/bin/perl -w
use strict;

...
    chomp;
    push @val, [ split ];
}