Select Code to Download

@new = map { s/$_/$_,hi/; $_ } <TEST>;

@new = map { s/$/,hi/; $_ } <TEST>;

@new = map { $_ . ',hi' } <TEST>;