Select Code to Download

#!/usr/bin/perl
use strict;
...
    exit;

}

se strict;
use warnings;
...

    print "</tr>\n";
}