perl -pe's/^(read_community)\s+XXXXXX/\1 newstring/'