Select Code to Download

use strict;
use warnings;
...

    return $id;
}

use strict;
use warnings;
...
print $cgi->header();

# etc