function __fisher_file awk -v FS=\t ' /@http/ { gsub("@.*$", "", $1) } !/^[ \t]*(#.*)*$/ { gsub("^[@*>]?[ \t]*?|#.*", "") if (! seen[$1]++) { printf("%s\n", $1) } } ' end