Commit | Line | Data |
c068db90 |
1 | ;# This legacy library is deprecated and will be removed in a future |
2 | ;# release of perl. |
3 | ;# |
2b69d0c2 |
4 | ;# shellwords.pl |
5 | ;# |
6 | ;# Usage: |
7 | ;# require 'shellwords.pl'; |
08b96d1f |
8 | ;# @words = shellwords($line); |
2b69d0c2 |
9 | ;# or |
08b96d1f |
10 | ;# @words = shellwords(@lines); |
2b69d0c2 |
11 | ;# or |
08b96d1f |
12 | ;# @words = shellwords(); # defaults to $_ (and clobbers it) |
9ef589d8 |
13 | |
c068db90 |
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 | |
6a724e38 |
18 | require Text::ParseWords; |
19 | *shellwords = \&Text::ParseWords::old_shellwords; |
9ef589d8 |
20 | |
9ef589d8 |
21 | 1; |