Next Tie::File 13

Deferred Writing

        my $f_obj = tied(@FILE);
        $f_obj->defer;
        for (@FILE) {
          s/^/>> /;
        }
        $f_obj->flush;


Next . Copyright © 2002 M. J. Dominus