Perl: pattern - Documentation for TrueSight Middleware and Transaction Monitor 8.1
James Rogers
The second split syntax is used in the Simple split example in Perl: split (split /!/, $inst_path). /PATTERN/ refers to a pattern that delimits the text. Patterns can be quite complex. For information /PATTERN/, consult Perl documentation.
In the Simple split example in Perl: split, the pattern /!/ returns four new variables--one for each element in the string delimited by '!'. Use the four elements as command line parameters to a program (or even another Perl script!). The following is the full example.
Pattern example
$inst_path = $QPASA_VARS[0]->{path}; $value = $QPASA_VARS[0]->{value}; ($host_name, $qmgr_name, $queue_name, $attr_name) = split /!/, $inst_path ; $output = "write_to_file.pl $host_name $qmgr_name $queue_name $attr_name "; $output .= "$value "; $QPASA_OUTPUT = $output;
This example creates the following output.
write_to_file.pl FARGO FARGO INVENTORY CurrentQDepth 506