Select Code to Download

use warnings;
use strict;
...

print $file if defined $file;
print $thing if defined $thing;