Select Code to Download

#!/usr/bin/env perl

...

printf $fmt, $_, 0+@{$venn{$_}}, "@{$venn{$_}}" for sort keys %venn;

Sets     #  Elements
----     -  --------
...
G        2  eel hog
H        1  zoo
I        1

#!/usr/bin/env perl

...
    printf $fmt, $sets, 0+@{$venn{$sets}},
        join ' ', sort @{$venn{$sets}};
}

Sets     #  Elements
----     -  --------
...
G        2  eel hog
H        1  zoo
I        1