Precisa ler um arquivo e usar resultados como argumentos de linha de comando em um shell script

Question

Eu tenho o seguinte arquivo de saída de um programa venn.

[1, 2],106
[1, 3],2556
[2, 3],5207
[1, 2, 3],232
[2],7566
[3],8840
[1],5320

Eu preciso de um comando para obter cada número de resultado de linha como argumento variável em um script como este:

$ area1 = aqui deve vir os resultados depois de [1], $ area2 = aqui deve vir os resultados depois de [2], $ area3 = aqui deve vir os resultados depois de [3], $ n12 = aqui deve vir os resultados depois de [1, 2], $ n13 = aqui deve vir os resultados depois de [1, 3], $ n23 = aqui deve vir os resultados depois de [2, 3], $ n123 = aqui deve vir os resultados depois de [1, 2, 3],

esses resultados serão usados no script abaixo para desenhar um diagrama de venn.

cat << catfile >> $prefix1-VennDiagram.R
library(VennDiagram);
venn.diagram(
    x = list(
        "$sample1" = c(1:$area1, $(($area1+1)):$(($area1+$n12)), $(($area1+$n12+1)):$(($area1+$n12+$n123)), $(($area1+$n12+$n123+1)):$(($area1+$n12+$n123+$n13))),
        "$sample2" = c($(($area1+$n12+$n123+$n13+1)):$(($area1+$n12+$n123+$n13+$area2)), $(($area1+1)):$(($area1+$n12)), $(($area1+$n12+1)):$(($area1+$n12+$n123)), $(($area1+$n12+$n123+$n13+$area2+1)):$(($area1+$n12+$n123+$n13+$area2+$n23))),
        "$sample3" = c($(($area1+$n12+$n123+$n13+$area2+$n23+1)):$(($area1+$n12+$n123+$n13+$area2+$n23+$area3)),  $(($area1+$n12+1)):$(($area1+$n12+$n123)), $(($area1+$n12+$n123+1)):$(($area1+$n12+$n123+$n13)), $(($area1+$n12+$n123+$n13+$area2+1)):$(($area1+$n12+$n123+$n13+$area2+$n23)))
        ),
    filename = "$prefix1-VennDiagram.tiff",
    col = "transparent",
    fill = c("red", "blue", "green"),
    alpha = 0.5,
    label.col = c("darkred", "white", "darkblue", "white", "white", "white", "darkgreen"),
    cex = 2.5,
    fontfamily = "arial",
    fontface = "bold",
    cat.default.pos = "text",
    cat.col = c("darkred", "darkblue", "darkgreen"),
    cat.cex = 2.0,
    cat.fontfamily = "arial",
    cat.fontface = "italic",
    cat.dist = c(0.06, 0.06, 0.03),
    cat.pos = 0
    );
catfile

Rscript $prefix1-VennDiagram.R
exit

    

Answer 1

Aqui está um folheto:

sed 's/^.*\],/ /' yourfile|tr -d '\n'|sed -e '$a\'

Se você está passando isso como opções para um comando, você pode remover o último sed e usar

sed 's/^.*\],/ /' yourfile|tr -d '\n'

    

Answer 2

Você pode usar awk para imprimir o último campo separado por vírgula de cada linha e, em seguida (desde que a lista de argumentos não exceda seus limites) xargs para montá-los em uma única linha:

$ awk -F, '{print $NF}' yourfile | xargs
106 2556 5207 232 7566 8840 5320