po = { 1, 'two', 'buckle my',
        [ 'Florsheim', 'Nike', 'Sandals', 'Thongs' ],
        'shoo' };

$sub = sub { print "code ref passed to the edge of panic boyeeeee\n" };

Export qw (po sub);
Build  qw (tmp/Conscript);