Select Code to Download

use strict;
use warnings;
...
print STDERR "-- with Input from File"        if $INPUT_FILE ; 

print STDERR sort @trace ;