/l

\w がウニの全角にも適用される。

---uni---
$_ = "あいうえお";
s/\w/H/lg;
print;
---uni---