#!/usr/bin/perl
use List::Util 'shuffle';
@words = split /\s+/, <>;
IyEvdXNyL2Jpbi9wZXJsCnVzZSBMaXN0OjpVdGlsICdzaHVmZmxlJzsKCkB3b3JkcyA9IHNwbGl0IC9ccysvLCA8PjsKcHJpbnQgam9pbiAnICcsIG1hcCB7IGpvaW4gJycsIHNodWZmbGUgc3BsaXQvLywgJF8gfSBAd29yZHM7CnByaW50ICJcbiIgLiBqb2luICcgJywgQHdvcmRzOw==