view release on metacpan or  search on metacpan

Report/examples/localTrojans.pl  view on Meta::CPAN

      last;
    } else {
      $line .= ', ' if $line;
      $line .= $trjs[$_];
    }
  }
  return($line);
};


# overlay above with below in order

@_ = split('\n',q|
#
# my additions + user contributions
1 Sockets des Troie
2 Death
701 Marotob
778 NetCrack
887 W32.Huayu
890 Dsklite