#!perl
use strict;
use HTML::Entities;
use Data::Dump 'pp';

my $string = "Group: Group Name▼▼Role: Role Name";
$string = decode_entities($string);
my @f=();
while ( $string =~ /(Group|Role)\:\s+([\x00-\x7f]*)/g ){
  push @f,$2;
};
pp \@f;