print "Genres: $genres[0]\n";
print "Genre: $genre\n";