Help for this page
#!/usr/bin/perl ... }
printing from head ... Current: line1 Previous: 0 Next: line2 Current: 0 Previous: Next: 30
line1 line2 line3 line4 line5