push @hubs, $1 if $line =~ /\d+ \s+ (\w+) \s+/x;