[過去ﾛｸﾞ] プログラミングのお題スレ Part21 (1002ﾚｽ)

プログラミングのお題スレ Part21 http://mevius.5ch.net/test/read.cgi/tech/1668333636/

上下前次1-新
通常表示 512ﾊﾞｲﾄ分割 ﾚｽ栞
抽出解除 必死ﾁｪｯｶｰ(本家) (べ) 自ID ﾚｽ栞 あぼーん

---

このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ

---

643: 638 [sage] 2023/05/06(土) 00:28:50.96 ID:vZgCL7uL >>642　Perl5 use utf8; binmode STDOUT => "utf8"; use feature qw{:5.16 signatures say}; say for sub($a, @b) { 　if (@b) { 　　my @s = __SUB__->(@b); 　　 (map{"$a・$_"} @s), (map{"$a$_"} @s); 　} else { $a } }->(split'', 'いろはにほ'); ※インデントは全角スペースに置換してあります。 　perl5の__SUB__は、5.16以降で使用可能な｢現在の関数(この場合無名関数)のリファレンス｣ 実行結果 ~ $ perl 21_642_いろはにほ.pl い・ろ・は・に・ほ い・ろ・は・にほ い・ろ・はに・ほ い・ろ・はにほ い・ろは・に・ほ い・ろは・にほ い・ろはに・ほ い・ろはにほ いろ・は・に・ほ いろ・は・にほ いろ・はに・ほ いろ・はにほ いろは・に・ほ いろは・にほ いろはに・ほ いろはにほ http://mevius.5ch.net/test/read.cgi/tech/1668333636/643

---

ﾒﾓ帳

(0/65535文字)

---

上下前次1-新書関写板覧索設栞歴

---

ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ

---

Google検索

Wikipedia

---

ぬこの手 ぬこTOP 0.035s