my $start=(split(/ /,$data[146]),3);

##</code><code>##

my @startline=split(/ /,$data[146]);
my $start=$startline[3];