Shell Programming and Scripting

 PROCESS1 DATE=130813 TIME=130503 BATCHNO=0000000013

/tmp/folder1
1
2
4
3
5
6
8
9
7
10

/tmp/folder2
1
2
3
4
5
6
7
8
9
10

#!/usr/bin/perl

use strict;
use warnings;
use File::Copy;
my %batch;
opendir(my $src, "/tmp/folder1")|| die "Could not open /tmp/folder1: $!\n";
while (my $f=readdir($src)){
    if ($f !~/^\.+/){
          open (my $transaction , "<", "/tmp/folder1/$f")|| die "Could not open file \"/tmp/folder1/$f: $!\n";
          my $head=readline($transaction);
          close($transaction);
          $batch{$f}=$1 if ($head=~/BATCHNO=(\d+)/);
    }
}
my $index=0;
for my $file (sort {$batch{$a}<=>$batch{$b}} keys %batch){
    copy("/tmp/folder1/$file", "/tmp/folder2/$index");
    $index++;
}

grep BATCHNO /tmp/folder1/* | sort -t"=" -nk 4

 for j in $(for i in /tmp//folder1/* ; do echo $i,$(head -1 $i| sed "s/.*BATCHNO=//");done | sort -k2 -t, | cut -d, -f1) ; do cp $j /tmp/folder2/$k; k=$(( $k + 1 )); done

/tmp/folder2 $ ls -tr| more 
1
2
3
4
5
6
7
8
9
10

#!/bin/bash
#Date :
#Author
#Purpose : Sort batch file
#Usage : ./sortbatch.sh <batchfile>

BATCHFILE=$1
ORDEREDBATCH=`pwd`/ordered_`date +%F_%H:%M`_$BATCHFILE

#Verify if a file was given
if [ $# -lt 1 ]; then
        echo "Usage : ./sortbatch.sh <batchfile>"
        exit 1
fi

#Verify if the file exists
if [ ! -e $BATCHFILE ]; then
        echo "File does not exist"
        exit 1
fi

#Read batch numbers
BATCHNRS=`awk '{print $4}' $BATCHFILE | sort | uniq`

#Copy to another file the lines in order of the batch number
for i in $BATCHNRS; do
        awk -v batch="$i" '{if ($4 == batch ) print $0}' $BATCHFILE >> $ORDEREDBATCH
done

#End