perl -ne'm[HTTP/([^"]+)] or next; print unless $seen{$1}++' access_log