RE: Splitting Files (AIX 5.2)

Run this after doing your split command. ( We don't need no stinkin' Perl. :-)) )

#!/bin/ksh

COUNT=1 for i in `ls -1 93_11_w2_.[a-z][a-z]* 2> /dev/null`; do

   j=`echo "$COUNT:$i" | /usr/bin/nawk -F: '{printf("%s%04d", substr($2,1,9), $1)'}`

   /usr/bin/mv "$i" "$j"
   COUNT=$(( $COUNT + 1 ))
done

>-----Original Message-----
>Is there any way I can make this split the files and name them:
>
>93_11_w2_0001, 93_11_w2_0002, 93_11_w2_0003, ....

--
To unsubscribe - mailto:oracle-l-request_at_freelists.org&subject=unsubscribe 
To search the archives - http://www.freelists.org/archives/oracle-l/