my @tmp = split /:/, $lines[-1];
my $last = $tmp[3];