my $w = Gtk2::Window->new(q/toplevel/);
my $color = Gtk2::Gdk::Color->parse(q/yellow/);
my $eb = Gtk2::EventBox->new();
my $sw = Gtk2::ScrolledWindow->new(undef, undef);
my $tv = Gtk2::TextView->new();
$eb->add($tv);
$eb->modify_bg(q/normal/, $color);
$sw->add_with_viewport($eb);
$w->add($sw);
$w->show_all();

Gtks->main();

0;