From: Dietmar Maurer Date: Thu, 24 May 2018 09:06:15 +0000 (+0200) Subject: add split_args helper X-Git-Url: https://git.proxmox.com/?p=pve-client.git;a=commitdiff_plain;h=a8d03417debaf23918cd8be8185628efa62032fd add split_args helper --- diff --git a/PVE/Tools.pm b/PVE/Tools.pm index dddf1c0..2d0b727 100644 --- a/PVE/Tools.pm +++ b/PVE/Tools.pm @@ -6,6 +6,7 @@ use POSIX qw(EINTR EEXIST EOPNOTSUPP); use base 'Exporter'; use IO::File; +use Text::ParseWords; our @EXPORT_OK = qw( $IPV6RE @@ -126,4 +127,11 @@ sub split_list { return @data; } +# split an shell argument string into an array, +sub split_args { + my ($str) = @_; + + return $str ? [ Text::ParseWords::shellwords($str) ] : []; +} + 1;