for my $row (split "$/", $output) {