if(ref($INPUT{$thing}) eq "ARRAY") { $INPUT{$thing} = join('^', $$INPUT{$thing}); }

##</code><code>##

join('^', $$INPUT{$thing})

##</code><code>##

@$INPUT{$thing}

##</code><code>##

@{ $INPUT{$thing} } 

##</code><code>##

if(ref($INPUT{$thing}) eq "ARRAY") { $INPUT{$thing} = join('^', @{$INPUT{$thing}}); }