Select Code to Download

say "Hello @{[ join(', ', @names) ]} how are you?";

use strict;
use warnings;
...

my $user_input = q{Hello @{[ join(', ', @names) ]} how are you?};
say $user_input;

Hello ikegami how are you?
Hello @{[ join(', ', @names) ]} how are you?