[Summary view] [Print] [Text view]

   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;