https://perl5.git.perl.org / perl5.git / blame_incremental
| Commit | Line | Data |
|---|---|---|
| 1 | ;# shellwords.pl | |
| 2 | ;# | |
| 3 | ;# Usage: | |
| 4 | ;# require 'shellwords.pl'; | |
| 5 | ;# @words = shellwords($line); | |
| 6 | ;# or | |
| 7 | ;# @words = shellwords(@lines); | |
| 8 | ;# or | |
| 9 | ;# @words = shellwords(); # defaults to $_ (and clobbers it) | |
| 10 | ||
| 11 | require Text::ParseWords; | |
| 12 | *shellwords = \&Text::ParseWords::old_shellwords; | |
| 13 | ||
| 14 | 1; |