mojolicious_bug.pl

use strict;
use warnings;

use Mojolicious::Lite;

get '/' => sub {
    my $self = shift;
	my @t = grep {"" !~ //} ("what the fuck?!");
	push @t, "everything ok";
        # we expect "everything ok" here but guess what we get?
	$self->render_text(shift @t) ;
};

app->start;