Help for this page

Select Code to Download


  1. or download this
    # Unordered
    my %diff; @diff{ @insttab } = ();
    delete @diff{ @inst };
    my @diff = keys %diff;
    
  2. or download this
    # Ordered
    my %in_inst; @in_inst{ @inst } = ();
    my @diff = grep { !exists($in_inst{$_}) } @insttab;