<%perl> # This is another way to embed perl in mason components. my $line = "-----------------------------------";

 <% $line %>
 |
 | This is a mason component.
 | 
 | The color is '<% $color %>'
 |
 <% $line %>

%# == parameters that can be passed by name in a form or url?name=value ==== <%args> $color => ''