Autodeferring

        for (@FILE) {
          s/^/>> /;
        }

• Loops like this are common

• Tie::File detects these and enables deferred writing automatically

• Then disables it again when you're done

• Unless you don't want that:

        tie @FILE, 'Tie::File', $myfile, autodefer => 0;

Next

Copyright © 2003 M. J. Dominus