Perl

StringBuilder ReplaceWord

Demonstrates the ReplaceWord method. Chilkat2 Perl

use strict;
use warnings;
use Chilkat2;

my $sb = Chilkat2::StringBuilder->new;
$sb->Append('forest, lumber, lumberjack, jack, timberland');

# The ReplaceWord method replaces word occurances.

# For example:
my $numReplacements = $sb->ReplaceWord('lumber', 'timber');
$numReplacements = $sb->ReplaceWord('jack', 'joe');

# The string content is now:
# forest, timber, lumberjack, joe, timberland
print $sb->GetAsString(), "\n";