{
  "method": "tools/call",
  "params": {
    "name": "perlcritic_analyze",
    "arguments": {
      "code": "use strict;\nopen FILE, 'test.txt';",
      "severity": 1
    }
  }
}

{"method": "tools/call", "params": {"name": "lookup_symbol", "arguments": {"name": "process_billing"}}}

{"method": "tools/call", "params": {"name": "get_file_structure", "arguments": {"filepath": "Finance/Billing.pm"}}}

{"method": "tools/call", "params": {"name": "get_callers", "arguments": {"name": "process_billing"}}}

{"method": "tools/call", "params": {"name": "index_status", "arguments": {}}}

{
  "method": "tools/call",
  "params": {
    "name": "check_before_push",
    "arguments": {
      "files": [{"filename": "Billing.pm", "code": "open(FILE, $path);"}],
      "block_severity": 4
    }
  }
}

./setup.sh

git push
  → .githooks/pre-push срабатывает локально
  → читает изменённые .pl/.pm файлы
  → отправляет на MCP-сервер
  → severity 4-5 → ❌ пуш заблокирован
  → severity 3   → ⚠ предупреждение, пуш идёт
  → чисто        → ✅ пуш проходит молча

MCP_URL="http://192.168.1.106:8000"  # адрес виртуалки банка

# На TeamCity-агенте (или вручную для теста):
perl tools/build_index.pl /path/to/perl/project | gzip > index.json.gz

curl -X POST http://<host>:8000/index/upload \
     -H "Authorization: Bearer $MCP_INDEX_TOKEN" \
     -H "Content-Encoding: gzip" \
     --data-binary @index.json.gz

┌─────────────────┐         ┌─────────────────┐
│   Компьютер      │         │   MCP Сервер    │
│   разработчика  │   HTTP   │   (Docker)      │
│                 │  ──────> │                 │
│   Файл:         │          │   Нет доступа   │
│   C:\project\    │          │   к файловой    │
│   script.pl     │          │   системе!      │
└─────────────────┘          └─────────────────┘

Пользователь: "Проверь C:\project\script.pl"
     ↓
LLM: Читаю файл C:\project\script.pl...
     ↓
LLM: Отправляю в MCP:
     {
       "code": "use strict;\nuse warnings;\n...",
       "filename": "script.pl"
     }

ПРОВЕРКА PERL КОДА:
1. Всегда читай файл ПОЛНОСТЬЮ перед анализом
2. Используй ТОЛЬКО параметр 'code' для perlcritic_analyze
3. НИКОГДА не используй параметр 'target' - он не работает для удалённого MCP

docker pull lenchik8/simple_mcp:latest

docker run -d --name mcp-drospr \
  -p 8000:8000 \
  -e MCP_INDEX_TOKEN=your_secret_token \
  -v mcp_data:/app/data \
  lenchik8/simple_mcp:latest

docker build -t mcp-drospr .
docker run -p 8000:8000 -e MCP_INDEX_TOKEN=your_secret_token mcp-drospr

pip install -e .
python server.py

mcp-drospr/
├── server.py                  # FastAPI, SSE, JSON-RPC, роутинг тулов
├── tools/
│   ├── perlcritic.py          # Perl::Critic анализ
│   ├── index_store.py         # SQLite хранилище PPI-индекса
│   └── build_index.pl         # Perl-скрипт сборки индекса (запускается на TeamCity)
├── data/
│   └── index.db               # SQLite индекс (создаётся после первой загрузки)
├── docs/
│   └── teamcity_setup.md      # Инструкция для TeamCity-администратора
├── Dockerfile
└── pyproject.toml

{
  "mcpServers": {
    "DROSPR_JARVIS": {
      "url": "http://<IP>:8000",
      "transport": "sse"
    }
  }
}

Проверь этот Perl файл на ошибки:
/path/to/script.pl

Проверь код, но покажи только серьёзные проблемы (severity 4-5)

Проверь этот Perl код:
use strict;
...

Проанализируй каждый .pl файл в папке /src/