捕获并解析Whateverable机器人的输出

由于这是在Perl 6文档中显示输出的标准方法,因此我使用whateverable机器人通过#perl6 IRC通道或#whateverable通道来评估表达式.产生的输出是这样的:

 10:28:19   jmerelo | p6: say 333444777 ~~ /(3+)/                                                                                                           ?
 10:28:19 evalable6 | jmerelo, rakudo-moar 5ce24929f: OUTPUT: «?333?? 0 => ?333??»  

(在WeeChat控制台程序中).从那个输出,我剪切并粘贴到文档,擦除我不感兴趣的部分.

我想知道是否有直接解析并保存输出一些简单的方法,无论是通过scriptint的IRSSI或weechat平台服务器为基础的(一些Whateverable机器人保存到间质瘤,例如),或基于客户端.

我认为在这种情况下最方便的解决方案是绕过irc机器人并定义一个bash函数.像这样的东西:

d6() { echo -n '# OUTPUT: «'; perl6 -e "$1" | sed -z 's/\n/?/g'; echo '»'; }

d6 'say 42'

# OUTPUT: «42?»

d6 'say 42' | tee >(xclip -selection clipboard)