Perl

Get MessageSet IDs as a Comma-Separated String

Demonstrates the Chilkat MessageSet.ToCommaSeparatedStr method, which returns the unique identifiers as a comma-separated string in ascending numeric order. It takes no arguments; an empty set returns an empty string. This example inserts a few ids and prints them.

Background: This is the fully expanded, human-readable form — every identifier listed explicitly, such as 1,2,3,5. It is handy for logging or display. When you need the terse form that collapses consecutive runs into ranges (for example 1:3,5), use ToCompactString instead. Like the compact form, the returned string contains only the numeric values and not the HasUids setting.

Chilkat Perl Downloads

Download Chilkat for Perl

Perl

use chilkat();

#  Demonstrates the MessageSet.ToCommaSeparatedStr method, which returns the unique identifiers
#  as a comma-separated string in ascending numeric order.  It takes no arguments.

$msgSet = chilkat::CkMessageSet->new();

#  Build a set by inserting individual identifiers.  The insertion order does not matter;
#  the identifiers are kept in ascending order and duplicates are ignored.
$msgSet->InsertId(3);
$msgSet->InsertId(1);
$msgSet->InsertId(2);
$msgSet->InsertId(5);

#  Get the identifiers as a comma-separated string.
$csv = $msgSet->toCommaSeparatedStr();
print $csv . "\r\n";
#  Output: 1,2,3,5