user-tools/Head

   1 #!/bin/bash
   2
   3 true <<EOF
   4 =pod
   5
   6 =head1 NAME
   7
   8 Head - output as many lines from the first part of files as many lines on the terminal currently
   9
  10 =cut
  11
  12 EOF
  13
  14
  15 head -n "$((${LINES:-$(tput lines)}-1))" "$@"