#!/usr/bin/perl -w

use WWW::Wikipedia;
use Encode;

my $wiki = WWW::Wikipedia->new();
my $entry = $wiki->search( 'Rotation' );
my @languages_available = $entry->languages();

foreach (@languages_available) {
	print "$_\n";
}