プログラミングのお題スレ Part22 (856レス)
プログラミングのお題スレ Part22 http://mevius.5ch.net/test/read.cgi/tech/1691038333/
上
下
前次
1-
新
通常表示
512バイト分割
レス栞
抽出解除
必死チェッカー(本家)
(べ)
自ID
レス栞
あぼーん
リロード規制
です。10分ほどで解除するので、
他のブラウザ
へ避難してください。
14: デフォルトの名無しさん [] 2023/08/08(火) 16:30:48.37 ID:mHXT/QMM >>10 2行目はもっと簡潔に書ける my %h = map{$_ => 1} map{lc} grep{/[a-z]/i} split ''; ↓ my %h = map{lc $_ => 1} /([A-Za-z])/g; 結局、これでよい筈 for (<DATA>) { my %h = map{lc $_ => 1} /([A-Za-z])/g; push @a, $_ if 26 == keys %h; } @s = sort{length $a <=> length $b} @a; print $s[0]; __DATA__ … (ry http://mevius.5ch.net/test/read.cgi/tech/1691038333/14
メモ帳
(0/65535文字)
上
下
前次
1-
新
書
関
写
板
覧
索
設
栞
歴
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
AAサムネイル
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.035s