知らんかったのでメモ use strict; use warnings; sub puts { print "@_\n" } my @args = qw/Panty and Stocking with Garterbelt/; puts(@args); { no strict 'refs'; no warnings 'redefine'; my $orgin_puts = *{'main::puts'}{CODE}; # local *main::put…
引用をストックしました
引用するにはまずログインしてください
引用をストックできませんでした。再度お試しください
限定公開記事のため引用できません。