Re^3: Scripts work when run individually but not when run as one compiled script

I use this line.. my $xlsx_WSD = ( "C:\\Temp\\Data\\data.xlsx"),, 1; because in windows the file can be read if it is open.

Well, the ,, 1 from above is gratuitous:

qwurx [shmem] ~> perl -MO=Deparse -e '$xlsx_WSD = ( "C:\\Temp\\Data\\d
+ata.xlsx"),, 1;'
$xlsx_WSD = 'C:\\Temp\\Data\\data.xlsx', '???';
-e syntax OK
[download]

See the '???' ? This is what's optimized away: the commas, and the 1.

Then, of course the file can be read if it is open - but only if it is opened for reading, right?

perl -le'print map{pack c,($-++?1:13)+ord}split//,ESEL'

Comment on Re^3: Scripts work when run individually but not when run as one compiled script Select or Download Code