$BKSIC_MODEL[$i] = (split(' ', $line))[1]; #### @BKSIC_MODEL = split(' ', $line);