Select Code to Download

#!/usr/local/bin/perl -w

...
                print "SERVER: $line";
        }
}

#!/usr/local/bin/perl -w

...
                }
        }
}