likk https://blog.hatena.ne.jp/likk/ NeverBlog::Likk::Unexistable; https://likk.hatenablog.com/ Perl/CGI 多重配列とかハッシュとかダメダメだったので、ついカッ(ry 再起使えよ という話。 関数部分 sub escapeHTML { @_ = @_ ? @_ : $_ if defined wantarray; for (@_ ? @_ : $_) { my $val = $_; my $type = ref $val; if($type eq 'ARRAY'){ if ((scalar @_) > 1){ escapeHTML(@$_); }else{ my @array = @$_; @array = escapeHTML(@array); return \@array; } }elsif($… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Flikk.hatenablog.com%2Fentry%2F20070426%2F1177584312" title=" CGI::escapeHTMLが貧相すぎるので - NeverBlog::Likk::Unexistable;" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> Hatena Blog https://hatena.blog 2007-04-26 19:45:12 rich https://likk.hatenablog.com/entry/20070426/1177584312 1.0 100%