#!/usr/bin/perl use strict; use warnings; use diagnostics; use PDF::Reuse; prDocDir('.'); prFile('test_pdf_reuse_out.pdf'); prField('[/test/]','test ersetzung'); prDocForm('test_pdf_reuse.pdf'); prEnd;