foreach my $browser ( values %{$data->{devices}->{device}} ) {
  push @agents, $browser->{user_agent};
}