Select Code to Download

use strict "vars";
use Win32;
...
} else {
        print "could not open zebra printer on port $port_name\n";
}