use strict;
require 'gen_subs.pl';

my $foo = { 'abc', 123, 'def', 456 };

gs::do_dumper( 'foo423:', $foo )   # 423 a silly, easy-to-find label
if 0;