use Smart::Comments;
### Begin printing here...
print "Just example\n";

##</code><code>##

$ perl -Wc mycode.pl  

##</code><code>##

Subroutine UNIVERSAL::VERSION redefined at /usr/lib/perl5/5.8.5/i386-linux-thread-multi/DynaLoader.pm line 253.
mycode.pl syntax OK