my ($match) = $_ =~ /.*ESSID:\"(.*)\"/x;
    push @essids, $match if $match;