use warnings; use strict; seek DATA, 0, 0; print while ; __END__