in reply to (GOLF) Randomizing lines

I've got it down to 47: 

123456789_123456789_123456789_123456789_1234567
perl -e'@l=<>;print splice(@l,rand@l,1)while@l'

[download]

In Section Meditations