diff options
| author | Steffen Mueller <smueller@cpan.org> | 2009-09-02 20:02:21 +0200 |
|---|---|---|
| committer | Steffen Mueller <smueller@cpan.org> | 2009-09-02 20:02:21 +0200 |
| commit | b2f4098f3f52450ba205d18eedf89072e222abf1 (patch) | |
| tree | bf9f8363cf4b8ee8804e074279b0dc3b269ce712 /lib/flush.pl | |
| parent | 2f8d2bfaceb99a65b65f6a843236685417122387 (diff) | |
| download | perl-b2f4098f3f52450ba205d18eedf89072e222abf1.tar.gz | |
Deprecate flush.pl with a warning
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 |