perlquestion
BillKSmith
I planned to recommend that [skjeiu] use the [doc://perlrun#Command-switch] (-i~) in his solution to [id://11125925]. My test case did not work as expected. The input file was correctly renamed as the backup. A new file was created with the original name. However, the print function sent its output to the screen rather than the file. What am I missing?
<c>
#!perl -i.bak
my @input = <>;
if (!scalar grep {/Friday/} @input) {
splice @input, 1, 0, "Friday\n";
}
print @input;
</c>
<p>
using Strawberry perl on windows 7
</p>
<c>
perl -v
This is perl 5, version 30, subversion 2 (v5.30.2) built for MSWin32-x64-multi-t
hread
</c>
<!-- Node text goes above. Div tags should contain sig only -->
<div class="pmsig"><div class="pmsig-957973">
Bill
</div></div>