in reply to Favourite One-liners?

There's this, which is useful in breaking up a certain type of fixed-length-record file (record size: 13612) into a file with line feeds at appropriate places:

perl -ple 'BEGIN {$/=\13612;}' pstann.new > pstann.new.linefeed

We can't just use the unix "pr" utility because that tends to break on upper-128 characters. 

--
@/=map{[/./g]}qw/.h_nJ Xapou cets krht ele_ r_ra/;
map{y/X_/\n /;print}map{pop@$_}@/for@/

[download]

In Section Meditations