Help for this page

Select Code to Download

Select or download this

            # Discard the buffered lines.
            @buffer = ();

            # Print the matched line.
            print $line;

Select or download this

            # Discard the buffered lines.
            @buffer = $line;