Select Code to Download

use strict;
use warnings;
...
$_ = $string;
eval "$substitution";
print;

(abc)
(def)
(ghi)