sub filter{
  $temp = $_[0];
  $temp =~ s/\:://; # Remove :: delimiter symbols in text.
  return ($temp);
}