[過去ログ] Perlについての質問箱 64箱目 (1002レス)
上下前次1-新
抽出解除 レス栞
このスレッドは過去ログ倉庫に格納されています。
次スレ検索 歴削→次スレ 栞削→次スレ 過去ログメニュー
リロード規制です。10分ほどで解除するので、他のブラウザへ避難してください。
97: 2019/09/14(土)12:00:19.76 ID:JUmWdv2U(1) AAS
どこでも使える
190: 2020/02/16(日)20:31:14.76 ID:7RTwZ9VV(1) AAS
まあ、自分で作るには兆便利だけど人のプログラムの修正やメンテはやりたくないなw
やっぱ、C言語ぐらい厳しくないとプロ用は無理だよね。
204(2): 2020/02/18(火)21:10:15.76 ID:Z1cJ/QMX(1) AAS
>>200
それじゃあソートできてないだろ
my @result = sort grep !$temp{$_}++, @list;
351: 2020/03/12(木)19:47:21.76 ID:IWxDU6vM(1) AAS
それは見れる \\wsl$
エクスプローラからしか見れないのが問題
472: 2020/06/12(金)05:38:56.76 ID:O2sQpJVa(3/3) AAS
答えじゃないんだけどさ、
$x = $ln =~ /^(パターン):/ && $1
これで以降は$xを使う、とか。
694: 2020/08/20(木)23:31:14.76 ID:S0D8s+y7(1) AAS
GUCCI
900: 2020/12/27(日)19:39:12.76 ID:CEWAcbKQ(1/2) AAS
あれ?
/usr/local/perlのままでもいけるんじゃないの?
Windowsはそこのパスを見てなかったような。
928(1): 2021/03/04(木)00:03:04.76 ID:ls8aTj6l(1) AAS
Ruby なら、
line_num = 0 # 行番号
# 行末の改行を削除して、1行ずつ処理する
results = File.foreach( "test154_data.txt", chomp: true ).with_object( [ ] ) do |line, accm|
line_num += 1
# 3行毎に、ハッシュを作って、蓄積変数に追加する
accm.push Hash.new if line_num % 3 == 1
ary = line.split( ':', 2 ) # 左からコロンで、2つに分割する
hash = accm.last # 最後の要素
hash[ ary[ 0 ] ] = ary[ 1 ]
end
p results
出力
[{"start"=>"aaa1", "end"=>"bbb1", "value"=>"1.23"},
{"start"=>"aaa2", "end"=>"bbb2", "value"=>"2.34"}]
954: 2021/03/08(月)12:34:19.76 ID:SORPad+v(2/3) AAS
dir /s の結果を使うのが一番楽
上下前次1-新書関写板覧索設栞歴
スレ情報 赤レス抽出 画像レス抽出 歴の未読スレ
ぬこの手 ぬこTOP 0.036s