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 11use Text::ParseWords 3.25 (); 12*shellwords = \&Text::ParseWords::old_shellwords; 13 141; 15