Deprecate shellwords.pl with a warning
authorSteffen Mueller <smueller@cpan.org>
Wed, 2 Sep 2009 21:04:13 +0000 (23:04 +0200)
committerSteffen Mueller <smueller@cpan.org>
Wed, 2 Sep 2009 21:04:13 +0000 (23:04 +0200)
lib/shellwords.pl

index b3ef33e..1c2c894 100644 (file)
@@ -1,3 +1,6 @@
+;# This legacy library is deprecated and will be removed in a future
+;# release of perl.
+;#
 ;# shellwords.pl
 ;#
 ;# Usage:
@@ -8,6 +11,10 @@
 ;#     or
 ;#     @words = shellwords();          # defaults to $_ (and clobbers it)
 
+warn( "The 'shellwords.pl' legacy library is deprecated and will be"
+      . " removed in the next major release of perl. Please use the"
+      . " Text::ParseWords module instead." );
+
 require Text::ParseWords;
 *shellwords = \&Text::ParseWords::old_shellwords;