98 my @substrings = ($content, $datastring); 102 return \@substrings unless ($stringlength); 105 return \@substrings if ($openposition == -1); 121 @substrings = ($content, $datastring); 122 return \@substrings if ($dataname eq '__data__'); # return content and data as strings 123 return \@substrings if ($dataname eq '__content__'); # return content and data as strings 124 return \@substrings unless length($datastring); # no reason to process empty datastring 130 @substrings = ($content, ''); 131 return \@substrings; 144 @substrings = ($content, $datastring); 145 return \@substrings;