my ($i_new, $j_new, $k_new, $l_new, $m_new, $n_new)
    = (split /\s+/,$line)[ -2, -8, -14, -5, -11, -17 ];