2011-02-07 行頭が「*」で始まらない場合、行頭に「**」を追加する Perl ワンライナー Oracle Perl 行頭が「*」で始まらない場合、もしくは、空行でない場合に、行頭に「**」を追加する Perl ワンライナー。 perl -nle '/^\*|^\s*$/ or s/^/\*\*/;print' hoge.txt
