Yo, authenticated! ##

##

[% IF user.is_authenticated %]
     Yo, authenticated!
[% END %]

##

##

 
  
    Yo, authenticated!
  
  
    NOT authed
  
 

##

##

use html::auth_dialog;

 my $tree = html::auth_dialog->new;

 $tree->highlander
    (auth_dialog =>
     [
      authed => sub { $_[0]->authenticated }
      not_authed => sub { 1 }
     ],
     $model
    );

  print $tree->as_HTML;

##

##

  
     blah blah blah
  

##

##

[% FOREACH s IN EXPRESSION %]
   * [% s %]
[% END %]


##

##

  
     blah blah blah
  

##

##

my $li = $tree->look_down(class => 'elemid');

  my @items = qw(bread butter vodka);

  $tree->iter($li => @items);

##

##

[tag://html,templating,seamstress]