523066680

反斜杠不是 \ 吗

echo https://agc.qq.com/show/chan|perl -e "print [split(/\/+/,<>)]->[2]"
复制代码

还是不要用切割了，匹配大概是这样吧：

$s = 'https://agc.qq.com/show/chan';
$s =~ /\/{2}.*?\/([^\/]+)/;
print $1;
复制代码