use strict;
use warnings;

use lib "Pfad/zu/libs";
use Net::IP;

my $ip = new Net::IP('1.2.3.4/4');

print ($ip->reverse_ip());