seek DATA, -53, 1;
eval <DATA> or print "Not Windows\n" or print "Windows\n";
__DATA__

##</code><code>##

seek DATA, -23, 1;
eval <DATA>;
print "Windows\n" or print "Not ";
__DATA__