Mojolicious Twitter Bootstrap Flash/Stash Alerts

gistfile1.pl

use Mojo::ByteStream;

app->helper(alerts => sub { 
    my $c    = shift;
    my $html = '';

    for my $message (qw|success info error|) { 
        my $css = "alert alert-$message";
	if($c->flash($message)) {
	    $html .= $c->tag('div', class => $css, $c->flash($message));
	}

	if($c->stash($message)) {
	    $html .= $c->tag('div', class => $css, $c->stash($message));
	}
    }

    b($html);
});