This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
untodo the no-longer-failing todo test for rgs' patch
[perl5.git] / lib / shellwords.pl
1 ;# This legacy library is deprecated and will be removed in a future
2 ;# release of perl.
3 ;#
4 ;# shellwords.pl
5 ;#
6 ;# Usage:
7 ;#      require 'shellwords.pl';
8 ;#      @words = shellwords($line);
9 ;#      or
10 ;#      @words = shellwords(@lines);
11 ;#      or
12 ;#      @words = shellwords();          # defaults to $_ (and clobbers it)
13
14 warn( "The 'shellwords.pl' legacy library is deprecated and will be"
15       . " removed in the next major release of perl. Please use the"
16       . " Text::ParseWords module instead." );
17
18 require Text::ParseWords;
19 *shellwords = \&Text::ParseWords::old_shellwords;
20
21 1;