PRINT(42) is syntactically correct, but will die once you remove the -c, as no PRINT sub was declared. Again, the sub can come from something like

eval ' sub PRINT { print 1 + shift }';
[download]

so you can't say during compile time whether PRINT will exist once you'll need it.

($q=q:Sq=~/;[c](.)(.)/;chr(-||-|5+lengthSq)`"S|oS2"`map{chr |+ord
}map{substrSq`S_+|`|}3E|-|`7**2-3:)=~y+S|`+$1,++print+eval$q,q,a,
[download]