Perlコーディング初心 ..
[
2ch
|
▼Menu
]
■コピペモード
□
スレを通常表示
□
オプションモード
□このｽﾚｯﾄﾞのURL
■項目テキスト
611: ◆TWARamEjuA 08/05/28 21:20:10 (´-`).｡ｏＯ(Net::CIDRでよさそうな。。。) 612:597 08/05/28 21:26:18 my @temp = ( $#array1 <=> $#array2 ) == -1 ) ? ( 0..$#array2 ) ; 0..$#array1; こんな前処理してから、>>599のmap対象配列に、( 0..\$temp ) って感じかなぁ？ エレガントさには欠けるけど、これが可読性保つギリギリかな？ 613:597 08/05/28 21:28:46 動作確認してないからtypoしまくり。まぁ分かるよね？（苦笑 614:６０７ 08/05/28 21:31:18 >>611 私へのレスですね。 明日調べてみます 615:599 08/05/28 22:23:24 >>610 ああ、 @array1 = ( undef, undef ) ; は考えてたけども、それは想定してなかったw >>612の解で良いんじゃね？ 助長を厭わないならば、 map{ 略 } 0 .. $#{$_[0]} , 0 .. $#_ - 1 ; っつー荒技もw 自分のスクリプトじゃ絶対やんないけどね。 616:599 08/05/28 22:27:21 >>615 s/助長/冗長/
次ページ
最新レス表示
スレッドの検索
類似スレ一覧
話題のニュース
おまかせリスト
▼オプションを表示
レスジャンプ
mixiチェック！
Twitterに投稿
オプション
しおりを挟む
スレッドに書込
スレッドの一覧
暇つぶし2ch
4955日前に更新/211 KB
担当:undef