Permalink
Switch branches/tags
Nothing to show
Find file
Fetching contributors…
Cannot retrieve contributors at this time
10 lines (6 sloc) 164 Bytes
use strict;
use warnings;
use Net::IPAddress::Minimal ('invert_ip');
my $input_string = shift @ARGV;
my $output = invert_ip( $input_string );
print "$output\n";