//usr/share/doc/libx11-protocol-perl/examples/widgets3.pl.gz