use strict;
use  HTML::Mason;
my $interp = HTML::Mason::Interp->new();
my $comp = $interp->make_component(comp_source => <<'END');
% my $planet = "World";
        Hello <% $planet %>
END
$interp->exec($comp);