Perl One-Linersdos2ux, ux2dosperl -wpe 's/\r\n/\n/' perl -wpe 's/\n/\r\n/' lc,ucperl -wne 'print lc' perl -wne 'print uc' sspperl -wne 'print if /\S/ || $a; $a = /\S/' rmnlperl -wne 'print if /\S/' nodupsperl -wne 'our %seen; print unless $seen++' rot13perl -wpe 'tr/a-zA-Z/n-za-mN-ZA-M/' shuffleperl -MList::Util=shuffle -we 'print shuffle <>' |