Shell Programming and Scripting

#include <stdio.h>
#include <stdlib.h>

int main(argc,argv)
int argc;
char **argv;
{
	while (1)
	{
		long i=1;
		long index=atol(argv[i++]);
		long cpos=0;

		while (1)
		{
			int c=getchar();

			if (c==EOF) return 0;

			if ((c=='\n')||(c=='\r')) 
			{
				printf("%c",c);
				break;
			}
			
			if (cpos==index)
			{
				printf(" ");

				if (i < argc) index=atol(argv[i++]);
			}

			printf("%c",c);

			cpos++;
		}
	}

	return 0;
}

awk 'BEGIN { 
           arr[1]="1,3"
	   arr[2]="4,5"
	   arr[3]="9,6"
	   arr[4]="15,5"
	   arr[5]="20,13"
	   arr[6]="33,5"
	   arr[7]="38,3"
	   arr[8]="41,3"
	   arr[9]="44,10"
     }
     { 
           for ( i=1;i<=9;i++ ) {
	     n=split(arr[i],coords,",")
	     printf substr($0,coords[1],coords[2])" "
	   }
	   print ""
     }
' "file"

$ sed "s/\(.\{3\}\)\(.\{6\}\)/\1 \2 /" file
607 010060 00000030380000000000000030380000400000000000
610 010060 00000008220000000000000008220000100000000000
612 010060 00000030150000000000000030150001000000000000
$

awk -v s="3,8,14,19,32,37,40,43" '
    BEGIN{
       n = split(s,b,",")
       for(i=1;i<=n;i++){
           t=b[i]
           a[t]=1
       }
    }
    {
       for(i=1;i<=length;i++)
           printf substr($0,i,1) (i in a?OFS:"")
       printf ORS
    }
    ' file1 > file2

607 01006 000000 03038 0000000000000 03038 000 040 000000000
610 01006 000000 00822 0000000000000 00822 000 010 000000000
612 01006 000000 03015 0000000000000 03015 000 100 000000000