Overview

No flashy new commands this time — just the quiet work of making everything sharper. Ten subs gained tracing, Claude got smarter memory management, YouTube search learned to show duration and view counts, and the Partyline grew a direct line to Claude. Plus a prompt cache to save API quota.

“Lumos Maxima! Every dark corner illuminated, every rough edge smoothed.” 🕯️✨

📋 Q1 — logBot() Added to 8 Commands

The following commands were posting public IRC output with no trace in the bot logs — now fixed:

All now traceable in action logs and in the console channel notice.

🧹 Q2 — Claude History Purged on QUIT / NICK

$self->{_claude_history} was growing indefinitely — every nick that quit left its conversation context in memory forever.

Two hooks added to mediabot.pl:

on_message_QUIT — deletes all history keys matching lc($sNick)\x00* on_message_NICK — same, using $sNick_n (the local variable for the changing nick, distinct from $sNick used in the QUIT handler)

my $prefix = lc($sNick) . "\x00";
delete $mediabot->{_claude_history}{$_}
    for grep { index($_, $prefix) == 0 } keys %{ $mediabot->{_claude_history} };

💬 F50 — !ai history

<teuk> m ai history
<mediabotv3> -teuk- 4 message(s) in context:
<mediabotv3> -teuk-   [user] what is TCP?
<mediabotv3> -teuk-   [assistant] TCP guarantees delivery and ordering via...
<mediabotv3> -teuk-   [user] and UDP?
<mediabotv3> -teuk-   [assistant] UDP is connectionless and faster but unreliable.

Shows the current conversation context (up to 6 messages) for the calling nick on the current channel. Delivered privately via botNotice. Content truncated at 120 chars per message for readability.

🖥️ F52 — Partyline .ai <prompt>

.ai what version of Perl does Mediabot use?
[Claude] Mediabot uses Perl 5 — specifically Net::Async::IRC for the event loop.

Calls claudeAI() directly from the Partyline session. Uses a lightweight local *Mediabot::Helpers::botPrivmsg override to capture bot output into the stream instead of sending it to IRC. Falls back to (no response) if Claude returns nothing.

No chanset gate — Partyline sessions are already authenticated.

⏱️ !uptime — Claude Request Counter (F54)

<teuk> m uptime
<mediabotv3> mediabotv3: up 3h 14m 7s | RAM 52.1 MB | load 0.08 0.05 0.01 | AI 23 req(s)

Reads mediabot_claude_requests_total from the Prometheus metrics registry. Only shown if non-zero — keeps the line clean when !ai hasn’t been used yet.

🎬 !yt search — Duration & View Count (F51)

<teuk> m yt search perl tutorial 2024
<mediabotv3> 🎬 Search: perl tutorial 2024  -- 3 result(s)
<mediabotv3> [1] Modern Perl in 2024  - by PerlMonks [12:34] 48.2K views - https://youtu.be/…
<mediabotv3> [2] Learning Perl Fast    - by CodeCraft [8:21] 12.7K views - https://youtu.be/…
<mediabotv3> [3] Perl Best Practices   - by teuk.org  [24:07] 3.1K views  - https://youtu.be/…

A second API call to videos?part=contentDetails,statistics fetches duration and view count for all result IDs in one batch request. Duration is parsed from ISO 8601 (PT4M13S → 4:13). View counts are formatted as 1.2M / 48K.

💾 F53 — !ai Prompt Cache (60s TTL)

If the exact same prompt (case-insensitive) is asked again within 60 seconds, Claude is not called — the cached answer is returned immediately.

require Digest::MD5;
my $prompt_key = Digest::MD5::md5_hex(lc($prompt));
my $pcache     = $self->{_claude_prompt_cache}{$prompt_key};
if ($pcache && (time() - $pcache->{ts}) < 60) {
    # serve from cache
}

Cache entries older than 120 seconds are evicted on the next write. The cached answer is still injected into the conversation history so context remains coherent.

🐛 Bug Fixed — $sNick vs $sNick_n in on_message_NICK

The Q2 NICK purge used $sNick — which doesn’t exist in on_message_NICK (the local variable is $sNick_n). This caused a Global symbol "$sNick" requires explicit package name compilation error at startup.

Fix: replaced $sNick with $sNick_n in the two affected lines.

📦 Files Changed