Select Code to Download

# before Damian's book I'd have used EOREPLY
my $reply_to_chester = <<'END_REPLY_TO_CHESTER';

sub do_stuff {
    my $self = shift;
...
    # Bear with me and assume I'll need $items again...
    for my $item (@$items) {
        # etc...

sub do_stuff {
    my $self = shift;
    alias my @items = @{ $self->{items} };
    for my $item (@items) {
        # etc...

END_REPLY_TO_CHESTER