(Perl) StringBuilder GetNth
Demonstrates the GetNth method.
use chilkat();
# The GetNth method is handy for getting parts from delimited strings.
# For example:
$sb = chilkat::CkStringBuilder->new();
$sb->Append("red,blue,\"green,purple\",,yellow");
$delimiterChar = ",";
$exceptDoubleQuoted = 1;
$exceptEscaped = 1;
# Prints "[red]"
print "[" . $sb->getNth(0,$delimiterChar,$exceptDoubleQuoted,$exceptEscaped) . "]" . "\r\n";
# Prints "[blue]"
print "[" . $sb->getNth(1,$delimiterChar,$exceptDoubleQuoted,$exceptEscaped) . "]" . "\r\n";
# Prints "[green,purple]"
print "[" . $sb->getNth(2,$delimiterChar,$exceptDoubleQuoted,$exceptEscaped) . "]" . "\r\n";
# Prints "[]"
print "[" . $sb->getNth(3,$delimiterChar,$exceptDoubleQuoted,$exceptEscaped) . "]" . "\r\n";
# Prints "[yellow]"
print "[" . $sb->getNth(4,$delimiterChar,$exceptDoubleQuoted,$exceptEscaped) . "]" . "\r\n";
# Prints "[]"
print "[" . $sb->getNth(5,$delimiterChar,$exceptDoubleQuoted,$exceptEscaped) . "]" . "\r\n";
|