Help for this page

Select Code to Download


  1. or download this
    open (GB,"$bookfile");
@oldstuff = <GB>;
...
print FILE "@oldstuff";
close FILE;
# rename file if necessary
  2. or download this
    open (FILE,">$newfile");
print FILE "pre-pendings here\n";
...
close GB;
close FILE;
# rename file if necessary