ファイルをシャッフルするワンライナー

perl -MList::Util -e 'print List::Util::shuffle <>' inputfile

巨大なファイルだと困るけど。