This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Fix ext/XS-APItest/t/multicall.t warning
[perl5.git] / lib / shellwords.pl
1 warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install it from the CPAN distribution Perl4::CoreLibs. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n";
2
3 ;# This legacy library is deprecated and will be removed in a future
4 ;# release of perl.
5 ;#
6 ;# shellwords.pl
7 ;#
8 ;# Usage:
9 ;#      require 'shellwords.pl';
10 ;#      @words = shellwords($line);
11 ;#      or
12 ;#      @words = shellwords(@lines);
13 ;#      or
14 ;#      @words = shellwords();          # defaults to $_ (and clobbers it)
15
16 require Text::ParseWords;
17 *shellwords = \&Text::ParseWords::old_shellwords;
18
19 1;