use warnings; use strict; 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"; } __END__ en #### use Data::Dumper; print Dumper($entry);