sub listc {
      my $lcm     = List::Compare->new(
                      $listrefs[0], $listrefs[1], $listrefs[2]);
      my @int     = $lcm->get_intersection();
      my $intref  = $lcm->get_intersection_ref();
  }

  sub mistc {
      my $lcm     = Mist::Compare->new(
                      $listrefs[0], $listrefs[1], $listrefs[2]);
      my @int     = $lcm->get_intersection();
      my $intref  = $lcm->get_intersection_ref();
  }