ぜろちゃんねるプラス質問スレ

839 ：名無しさん＠ぜろちゃんねるプラス：2013/12/20(金) 17:40:09.80 ID:CETsmwEV0

>>836
ありがとうございます
うまく組み合わせることができ、表示されるようになりました

あと一点ご質問なのですが、
my (undef, undef, $date, $text) = split(/<>/, $lines[$n], -1);
($onename, my $text) = (split(/<>/, $lines[$n], -1))[0,3];
は一行もしくは簡潔にまとめることはできますでしょうか？

840 ：839：2013/12/20(金) 17:47:20.64 ID:CETsmwEV0

失礼しました

my (undef, undef, $date, $text) = split(/<>/, $lines[$n], -1);
($onename, my $text) = (split(/<>/, $lines[$n], -1))[0,3];

は最終書き込みではなく、
レス番号 : 最新レスのコメント
レス番号 : 最新レスのコメント
レス番号 : 最新レスのコメント
での想定です