Shell Programming and Scripting

awk 'BEGIN { COUNTER=1;
                            FS="|" } 
                          { while ( COUNTER <=100 )
                             {
                            print $COUNTER
                              COUNTER++

                               }
                          COUNTER=1 }' filename

awk 'BEGIN { min = 200; max = 300 }
{ 
  for (i=min; i<=max; i++)
    printf "%s", $i (i < max ? FS : RS)
    }' infile

perl -lane'print join " ",@F[200..300]' infile

cut -d\  -f200-300 infile

awk '{for (i=200;i<=300;i++){r=""} {r=r $i} print $r;}' 1.txt

awk '{
  for (i=200;i<=300;i++) { # step 1
    r = ""                 # step 1.1
    } 
  { r = r $i }             # step 2
  print $r                 # step 3
  }' 1.txt

awk '{
  for (i=200; i<=300; i++) 
    r = r $i 
  print r; r = ""
  }'