#!/bin/awk -f

# usage: csvgrep row column [file]

BEGIN {
    FS = "[ \t]*,[ \t]"
    row = ARGV[1]
    col = ARGV[2]
    ARGV[1] = ARGV[2] = ""

    # read header
    getline
    for (i=1; i<=NF; i++)
        if ($i == col) {
            col = i
            break
        }
}

($1 == row) { print $col }