Examples

Next Tie::File 8

How do I append to the beginning of a file?

        tie @LOG, 'Tie::File', 'DrainC.log' or die ...;
        unshift @LOG, $new_record1, $new_record2, @more_new_records;