If you want to split a string value to lines, try @lines = split /^/ $string;.