Shell Programming and Scripting

11873,12594,13402,      12227,12721,14409,

14362,14969,15795,16606,16857,17232,17914,18267,18500,18912,      14829,15038,15947,16765,17055,17742,18061,18369,18554,19759,
14406,16857,17232,17914,18267,24737,29320,	   16765,17055,17742,18061,18366,24891,29370,
34611,35276,35720,	35174,35481,36081,
69090,	70008,

11873-12227,12594-12594,13402-14409

awk '
    {
        gsub( ",$", "", $1 );
        gsub( ",$", "", $2 );
        na = split( $1, a, "," )
        split( $2, b, "," );
        for( i = 1; i <= na; i++ )
            printf( "%d%c", a[i] - b[i], i == na ? "" : "," );
        printf( "\n" );
    }
' input-file

11873,12594,13402,      12227,12721,14409,

12594-11873,13402-12594    12721-12227,14409-12721

awk '
    {
        gsub( ",$", "", $1 );
        gsub( ",$", "", $2 );
        na = split( $1, a, "," )
        split( $2, b, "," );
        for( i = 1; i <= na; i++ )
            printf( "%d-%d=%d%c", a[i], b[i], a[i] - b[i], i == na ? "" : "," );
        printf( "\n" );
    }
' input-file

awk '
    {
        gsub( ",$", "", $1 );
        gsub( ",$", "", $2 );
        na = split( $1, a, "," )
        split( $2, b, "," );
        for( i = 1; i <= na; i++ )
            printf( "%d-%d%c", a[i], b[i], i == na ? "" : "," );
        printf( "\n" );
    }
' input-file

awk '
    {
        gsub( ",$", "", $1 );
        gsub( ",$", "", $2 );
        for( j = 1; j <= NF; j++ )
        {
            na = split( $1, a, "," )
            for( i = 2; i <= na; i++ )
                printf( "%d%c",  a[i] - a[i-1], i == na ? "" : "," );
            printf( "   " );
        }

        printf( "\n" );

    }
' input-file