Select Code to Download

!#/usr/bin/perl -w
use strict;

...

# close the handle, which implicitly sends an EOF
close SMB;