#!/usr/bin/perl
use strict;
use warnings;

use Net::Packet::Target;

my $t3 = Net::Packet::Target->new;
$t3->ip('127.0.0.1');
$t3->port(22);
$t3->protocol('tcp');

print $t3->isMultiple."\n";

print $t3->port.':'.$t3->protocol.' do stuff for IPv4 '.$t3->ip."\n";