Directory:~$ /usr/share/perl5/vendor_perl/

Upload File

[Home] [System Details] [Kill Me]

;# shellwords.pl
;#
;# Usage:
;#	require 'shellwords.pl';
;#	@words = shellwords($line);
;#	or
;#	@words = shellwords(@lines);
;#	or
;#	@words = shellwords();		# defaults to $_ (and clobbers it)

use Text::ParseWords 3.25 ();
*shellwords = \&Text::ParseWords::old_shellwords;

1;