$ perl -w rdt.pl 10.1.2.3 12345 abc
Name "main::proto" used only once: possible typo at rdt.pl line 15.