Select Code to Download

$buffer->set_text($sysbuffer);
Gtk2->main_iteration while Gtk2->events_pending;

#!/usr/bin/perl -w
use strict;
...
}
#########################################
__END__