The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

var x=1/*@a*/
/2/*@a*/
/ /*@a*/
2
/a/a;/*@a*/
2/*@a*//2;/regexp/ /*@a*/
/regexp/;/*@a*/
a+/*@a*/++a;a-/*@a*/--a;a/*@a*/a;a3/*@a*/.a