sub get_MD5 {
  my @output = @_;
  my $md5=Digest::MD5->new;
  $md5->add("@output");
  return $md5->hexdigest();
}