Prototype for a modern-ish Perl 5 pragma