Select Code to Download

#! /tools/perl/5.8.8/linux/bin/perl
use strict;
...
close $filter;
close $input;
close $output;