如何在运行的Gtk3(Perl)程序中修改标签的背景色？

use Gtk3 '-init';
my $app = Gtk3::Application->new('org.example.myapp', 'flags-none');

my $window = Gtk3::Window->new('toplevel');
$window->set_title('My App');
$window->set_default_size(400, 300);

my $fixed = Gtk3::Fixed->new();
$window->add($fixed);

my $label = Gtk3::Label->new('Hello, World!');
$label->modify_bg('normal', Gtk3::Gdk::RGBA->new(1, 0, 0, 1));  # 设置背景色为红色

$fixed->put($label, 100, 100);  # 设置标签在容器中的位置为(100, 100)

$window->show_all();
Gtk3->main();