The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
#!/usr/bin/perl

my $expected = [
	[
		{
      interval => 10,
      host => "localhost.localdomain",
      plugin => "OK::Read",
      type => "gauge",
      type_instance => "ti",
      plugin_instance => "pi",
      values => [ 42 ],
    }
	]
];