Как я могу прокомментировать только часть строки в Perl?

Если это действительно так важно, используйте фильтрацию источника.

# C_Style_Comments.pm
package C_Style_Comments;
use Filter::Simple;
FILTER {   s{/\* .* \*/}{}gmx    };
1;

$ perl -MC_Style_Comments -e 'print /* 5, No wait, I mean */ 3'
3

Любая причина, по которой вы не можете писать:

if($clevel==0){#never happends}

как:

if($clevel==0){} #never happens

Есть несколько уловок, которые вы можете do, чтобы скрыть сообщения, например:

0 and 'some comment'

Но вы только усложните ситуацию, если кому-то еще придется поддерживать ваш код в будущем.

Работа в рамках ограничений языка, вместо того, чтобы пытаться заставить его действовать как какой-то язык, с которым вы более знакомы, часто приводит вас к изучению нового. Лично я ненавижу работать в IDL, но некоторые приемы, позволяющие справиться с плохой производительностью цикла, побудили меня оптимизировать код, который я с тех пор написал на других языках.

A # , а затем разрыв строки. Вы можете рассматривать их как своего рода скобку , поскольку мало что в Perl теряет смысл из-за того, что находится на разных линиях.

my $ans = 2 + rand( 5 ) + $pixels / FUDGE_FACTOR;

Кому

my $ans = # 2 + 
    rand( 5 ) + $pixels # / FUDGE_FACTOR
    ;

Или от:

if ( dont_know_how_this_breaks() && defined $attribute ) { 
   #...
}

Кому:

if ( # dont_know_how_this_breaks() && 
     defined $attribute ) { 
   #...
}