Select Code to Download

missense,0.40851449275362317,1.0,-100
2.853,2.853,5.706,2.853,2.853,8.559,8.559,...
...
frameshift,0.056074766355140186,0.7697841726618705,-64
5.290,1.763,0.000,8.817,1.763,3.527,1.763,...
missense,0.44542772861356933,1.0,0

open FILE, "<", "weird" or die $!;
my @data = <FILE>;
...
for (my $line=0; $line<1; $line++) {
    print $data[$line];
        }

my @tmp = split(',', $data[0]);
print $tmp[$#tmp]."\n".$tmp[$#tmp-1];

missense,0.40851449275362317,1.0,
2.853,2.853,5.706,2.853,2.853,8.559,8.559,...
0