$output = qq(
    @{[ '*' x 80 ]}
);

##</code><code>##

my $STARS = '*' x 80;
my $output = qq(
    $STARS
);