23/05/28 12:43:42.23 yjwdVP6E.net
説明不足でした
$aa=~s/.+hoge.+\n// if $aa!~/hoge.+hoge/s;
これなぜにかダメです
$aa=~s/(hoge.+hoge)|[^\n]+hoge[^\n]+\n/$1/s;
23/05/28 12:43:42.23 yjwdVP6E.net
説明不足でした
$aa=~s/.+hoge.+\n// if $aa!~/hoge.+hoge/s;
これなぜにかダメです
$aa=~s/(hoge.+hoge)|[^\n]+hoge[^\n]+\n/$1/s;