2008-10-22 split perl my $hoge = "hoge "; my @items = split("\n", $hoge ) # hogeだけ my @items = split("\n", $hoge , -1 ); # 改行も入る