# perl ssh.pl <host name> <port> <username> <password>
Password:
Authentication successful.
Starting DPA for port 1
Authentication successful.
Escape Sequence is: Control-]

You are now master for the port.