ok

Mini Shell

Direktori : /usr/share/perl5/vendor_perl/
Upload File :
Current File : //usr/share/perl5/vendor_perl/shellwords.pl

;# 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;

Zerion Mini Shell 1.0