c:\test>perl -mstrict -we"1;"

c:\test>perl -mstrict -we"2;"
Useless use of a constant in void context at -e line 1.

##</code><code>##

while( 1 ) {...
... if 1;
1 while ....;

##</code><code>##

timethese -1, {
    trivial1  => sub {1},
    trivial2  => sub {2},
};;
Benchmark:
running
  trivial1, trivial2
 for at least 1 CPU seconds
...
[Range iterator outside integer range at (eval 57) line 1, <STDIN> line 7.