diff options
Diffstat (limited to 'lib/flush.pl')
| -rw-r--r-- | lib/flush.pl | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/lib/flush.pl b/lib/flush.pl index 8aa6d5580c..577f7c7826 100644 --- a/lib/flush.pl +++ b/lib/flush.pl @@ -1,12 +1,18 @@ # # This library is no longer being maintained, and is included for backward # compatibility with Perl 4 programs which may require it. +# This legacy library is deprecated and will be removed in a future +# release of perl. # # In particular, this should not be used as an example of modern Perl # programming techniques. # # Suggested alternative: IO::Handle -# + +warn( "The 'flush.pl' legacy library is deprecated and will be" + . " removed in the next major release of perl. Please use the" + . " IO::Handle module instead." ); + ;# Usage: &flush(FILEHANDLE) ;# flushes the named filehandle |