##
date0_element::item::value|item::value|item::value|data1_element::item::value|item::value|item::value
####
#!/usr/bin/perl
$_="monsa::clear::1|red::23|blue::50|monsb::clear::80|red::90|blue::100|";
@instances = m/(\S+::\S+::\S+\|\S+::\S+\|\S+::\S+\b)/g;
foreach $inst (@instances) {
print "found $inst\n";
}
exit;
####
monsa::clear::1|red::23|blue::50
monsb::clear::80|red::90|blue::100