@array = map { [split//] } (split/\n/,$string);