>>667-668
おんなじだよ。

> cat test.pl
while(1){1}
for(;;){1}
> perl -MO=Deparse test.pl
while (1) {
　　'???';
}
while (1) {
　　'???';
}
test.pl syntax OK