#Begin###Calculate the time difference
my $dtnow = DateTime->now;
my $timereceived = "10/10/2017 11:35 PM";
my $strp = DateTime::Format::Strptime->new(on_error=>'croak',pattern =>  '%m/%d/%Y %H:%M %t', time_zone=>'UTC');
my $dtevent = $strp->parse_datetime($timereceived);
my $diff_sec = $dtnow->subtract_datetime_absolute($dtevent)->in_units('seconds');
my $diff_hours = sprintf("%.0f" , $diff_sec/(60*60));
#End###Calculate the time difference

##</code><code>##

my name = 'greenfield (Glossary) (100)'
   foreach ( $name =~ /\((.*?)\)/ )
   {
	$appID = $1;
   }