my $count=()=$argstring=~/\s+/g;
my ($arg1, $arg2, $arg3) = split /\s+/, $argstring;