Как я могу найти скопировать/вставить (дубликат, клон) код в Perl?

Что вы подразумеваете под повторяющимся кодом? Просто точное совпадение символов или семантическое совпадение.

Существует несколько инструментов, таких как http://pmd.sourceforge.net/ , которые могут обнаруживать повторяющийся код по совпадениям строк, этот инструмент предназначен для java, но сопоставление источника работает с обычным текстом.

Если вы хотите, чтобы семантическое соответствие, например

sub A
{return 1;}

соответствовало

sub B
{
    return 1;
}

, тогда вам понадобится что-то еще: (

Semantic Designs создает продукт под названием Clone Dr. который, похоже, может анализировать большое количество языковых типов для клонированных участков кода. Но похоже, что их бесплатная ознакомительная версия работает только на Java и Cobol.

Я только что оценил Симиана . Он имеет 15-дневный бесплатный пробный период и стоит сотню долларов за лицензию на одного пользователя. Он официально не поддерживает Perl, но обрабатывает их как простой текст и все равно анализирует их. Это супер быстрая утилита! И очень проста в использовании. Отчет, созданный с помощью этого инструмента, был простым и легко интерпретируемым. Я полностью одобряю этот инструмент. Теперь мне просто нужно поговорить со своим начальником и уговорить его купить лицензию.

I have used CCFinder in the past to find sections of code which are duplicates. It works quite well but has an.. interesting interface. It doesn't have native support for perl, but it does have a plaintext option which should work for detection of copy and pasting at least. There is a Windows and Ubuntu solution - Freeware, not open source unfortunately.

Вот еще одна веб-страница, на которой перечислены некоторые инструменты обнаружения клонов:

http://sel.ics.es.osaka-u.ac.jp/cdtools/index-e.html