hello_world.pl 

#!/usr/bin/perl

use strict;
use warnings;

use Clutter qw( :init );

my $stage = Clutter::Stage->get_default();
$stage->set_size(600, 400);
$stage->set_color(Clutter::Color->parse('DarkSlateGray'));

my $label = Clutter::Label->new("Sans 30", "Hello, World!");
$label->set_color(Clutter::Color->parse('#f4961bff'));
$label->set_anchor_point(0, 0);
$label->set_position(10, 10);
$stage->add($label);

$stage->show_all();

Clutter->main();

exit;