#!perl seek DATA,0,0; print <DATA> __DATA__
[download]