#!perl
use v5.36.0;
use Slack::BlockKit::Sugar -all => { -prefix => 'bk_' };
use utf8;

my $channel_id = q{C079XSBFV0F};

return bk_blocks(
  bk_richblock(
    bk_quote(
      bk_emoji("male-construction-worker::skin-tone-4"),
      bk_richtext(" This is quoted text with a link to "),
      bk_link("https://rjbs.cloud/", "Rik's blog"),
      " as discussed on ", bk_channel($channel_id), ".\n\n",
      "See also: ",
      bk_link(
        "https://rjbs.cloud/",
        "Rik's other blog",
        { style => { strike => 1 } }
      ),
    ),
  )
);
