Select Code to Download

#! /usr/bin/perl -w
use strict;
my $wkdir = '/var/sadm/install';
...
    }
}
close I;  # be polite