perl

improve debug-printing #3303

Job	Run time
notify	27s
ci-ubuntu-containers (centos:centos7)	4m 45s
ci (ubuntu-latest, 5.10)	2m 27s
cygwin	0s
ci (5.30, ubuntu-latest, true, true)	4m 7s
ci (5.30, ubuntu-latest, true)	2m 59s
ci (5.30, ubuntu-latest, 1)	2m 50s
ci (5.30, ubuntu-latest, true)	3m 26s
ci (5.30, ubuntu-latest, true)	3m 3s
ci (5.30, ubuntu-latest, true)	3m 5s
ci (5.26, windows-latest)	6m 10s
ci (5.30, macos-latest)	15m 26s
build-status	18s
	49m 3s

Provide feedback