if ($curline !~ /^#\s/ or $curline !~ /^\s/)

##</code><code>##

if (1)

##</code><code>##

if ($curline !~ /^#?\s/)