Initial commit.

multitail/convert-geoip.pl

@@ -0,0 +1,21 @@
+#!/usr/bin/perl
+
+use Geo::IP;
+
+my $gi = Geo::IP->new(GEOIP_STANDARD);
+
+$| = 1;
+
+while(<>)
+{
+	chomp($_);
+
+	$country = $gi->country_code_by_addr($_);
+
+	if ($country eq '')
+	{
+		$country = '?';
+	}
+
+	print "$_ ($country)\n";
+}