%line = $data[$i];