blob: 1c2c894794e6d761ef780c43efc0cce8c14007ea (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
;# This legacy library is deprecated and will be removed in a future
;# release of perl.
;#
;# shellwords.pl
;#
;# Usage:
;# require 'shellwords.pl';
;# @words = shellwords($line);
;# or
;# @words = shellwords(@lines);
;# 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;
1;
|
