行頭が「*」で始まらない場合、行頭に「**」を追加する Perl ワンライナー

行頭が「*」で始まらない場合、もしくは、空行でない場合に、行頭に「**」を追加する Perl ワンライナー。

perl -nle '/^\*|^\s*$/ or s/^/\*\*/;print' hoge.txt