Select Code to Download

perl -d:CallTrace i-Mage.pl 2> trace.txt

   my @array = qw(perl -d:CallTrace i-Mage.pl);
...
      @array
   );