Another helper routine that I don't want to add back and forth each commit.
This commit is contained in:
parent
2ebcf5620f
commit
074d37fcb8
@ -4,6 +4,11 @@ package Util;
|
|||||||
use strict;
|
use strict;
|
||||||
use warnings;
|
use warnings;
|
||||||
|
|
||||||
|
sub plibs {
|
||||||
|
my $prefix = shift;
|
||||||
|
print STDERR "$prefix: ".join(", ", @_)."\n";
|
||||||
|
}
|
||||||
|
|
||||||
# prints hash in compact form, for debugging purposes
|
# prints hash in compact form, for debugging purposes
|
||||||
sub phash {
|
sub phash {
|
||||||
my $h = shift;
|
my $h = shift;
|
||||||
|
Loading…
x
Reference in New Issue
Block a user