diff options
| author | Steffen Mueller <smueller@cpan.org> | 2009-09-02 23:03:20 +0200 |
|---|---|---|
| committer | Steffen Mueller <smueller@cpan.org> | 2009-09-02 23:03:20 +0200 |
| commit | dae3596911c3c5ede3bf3e31f4eaf217cdf90ef8 (patch) | |
| tree | 3a903d41ad1e1883a3e882ac8016acce2d105903 /lib/look.pl | |
| parent | 19aca64933c801470dbac7c3262f00a8f0d0310b (diff) | |
| download | perl-dae3596911c3c5ede3bf3e31f4eaf217cdf90ef8.tar.gz | |
Deprecate look.pl with a warning
Diffstat (limited to 'lib/look.pl')
| -rw-r--r-- | lib/look.pl | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/lib/look.pl b/lib/look.pl index ccc9b6162a..fec31fed8c 100644 --- a/lib/look.pl +++ b/lib/look.pl @@ -2,10 +2,15 @@ # # 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. -# + +warn( "The 'look.pl' legacy library is deprecated and will be" + . " removed in the next major release of perl." ); + ;# Sets file position in FILEHANDLE to be first line greater than or equal ;# (stringwise) to $key. Pass flags for dictionary order and case folding. |