#!/usr/bin/perl

use Math::Random;

@lines = <>;
print random_permutation(@lines);
