my $result = qx/perl -c -e '$code' 2>&1/; # bundle STDOUT and STDERR