Welcome back Sample Username, you last logged in Sat 23rd Aug #### Welcome back Sample Username, you last logged in Sat 23rd Aug #### $h = { user => { name => "Fergal Daly" last_login => "Feb 22nd" } } #### Welcome back Fergal Daly, you last logged in Feb 22nd #### require html::welcome_form; my $tree = html::welcome_form->new; my $user_name = $tree->look_down('tal:content' => 'user/name'); $user_name->replace_content($hash->{user}{name}); my $last_login = $tree->look_down('tal:content' => 'user/last_login); $last_login->replace_content($hash->{user}{last_login}); #### for my $content (qw(name last_login)) { $tree->look_down('tal:content' => $content) ->replace_content($hash->{user}{$content}); }