Select Code to Download

given ($hash{'eventName'})
{
  when ('AudioLevel') {...}
  ...
}

my %keys = (
  AudioLevel => [qw(StreamNumber StreamPosition AudioLevel)],
...
{
  die "unknown event $hash{'eventName'}";
}

my %keys = (
  ...
...
  die "unknown event $hash{'eventName'}";
}