Select Code to Download

#!/usr/bin/perl -w
use strict;
...
          )->pack(  );

MainLoop();

#!/usr/bin/perl

...
$window->show_all;

main Gtk2;