Net::Azure::EventHubsを使ってAzure EventHubs経由でAzure Functionsの関数を起動する事例

sent-event.pl

use strict;
use warnings;
use utf8;
use Net::Azure::EventHubs;

### EventHubsの接続文字列をここに入れる
my $connection_string = '...'; 

### EventHubs向けにイベントを送るClientを作る
my $client = Net::Azure::EventHubs->new(
    connection_string => $connection_string
);

### 送信するペイロード
my $payload = {
    id      => "ytnobody",
    message => "わいとんはPerlが好きなフレンズなんだね",
};

### ペイロードを送る
$hub->message($payload)->do;