Search Results

It is because I did not pay enough attention. Apologies.
Please, try the following:
perl -ne '@c=/(\w+)"\s+:\s+("[^"]*")/ and push @h, $c[0] and push @r, $c[1]; END{$"=","; print "@h\n@r\n"}'...

#!/bin/bash

header=(); values=()

while IFS=":" read var val
do
if [[ "$var" =~ "\"" ]]; then

var="${var//\"/}"; var="${var% }"
[[ "${#header[@]}" -eq "0" ]] && header=("$var") ||...

Would this work?
perl -ne '@c=/(\w+)"\s+:\s+("[^"]+")/ and push @h, $c[0] and push @r, $c[1]; END{$"=","; print "@h\n@r\n"}' naveen.file
Output:...