perl-Test-Trap: update