Help for this page
push (@results, "$1::$2::$3") while $result_content =~ /$regex/g;
while ($result_content =~ /$regex/g) { push (@results, "$1::$2::$3"); }