# This prints: Just another Perl hacker,
seek DATA,15,0 and  print   q... <DATA>;
__END__